diff options
Diffstat (limited to 'npc')
70 files changed, 2230 insertions, 2207 deletions
diff --git a/npc/re/cities/brasilis.txt b/npc/re/cities/brasilis.txt index 405ce486c..417dc87b8 100644 --- a/npc/re/cities/brasilis.txt +++ b/npc/re/cities/brasilis.txt @@ -132,7 +132,7 @@ brasilis,137,77,5 script Ice-Cream Maker 4_M_03,{ else break; } - set .@icecream_hap,.@input*100; + .@icecream_hap = .@input*100; if (Zeny < .@icecream_hap) { mes "[Ice Cream Maker]"; mes "Dood~! You don't have enough money."; diff --git a/npc/re/cities/dewata.txt b/npc/re/cities/dewata.txt index 1205a4de1..022d3d715 100644 --- a/npc/re/cities/dewata.txt +++ b/npc/re/cities/dewata.txt @@ -278,12 +278,12 @@ dewata,146,109,5 script Restauranteur#dew 4_COOK,{ case 1: mes "[Restauranteur]"; mes "This is Nasi Goreng fried with my special sauce plus egg fry on the top. It only costs ^0000FF5000^000000 Zeny."; - set .@food,11532; + .@food = 11532; break; case 2: mes "[Restauranteur]"; mes "This is the Satay, a slice of meat skewered and grilled over Palm fruit charcoal. It costs only ^0000FF5000^000000 Zeny."; - set .@food,11533; + .@food = 11533; break; } next; @@ -474,9 +474,9 @@ dewata,89,191,6 script Small Shrine#dew1 CLEAR_NPC,{ mes "- Cancelled. -"; close; } else if (.@input <= 50000) - set .@good_luck, rand(1,10000); + .@good_luck = rand(1,10000); else - set .@good_luck, rand(1,5000); + .@good_luck = rand(1,5000); if (.@input > Zeny) { mes "- Not enough Zeny. -"; close; @@ -498,10 +498,10 @@ dewata,89,191,6 script Small Shrine#dew1 CLEAR_NPC,{ 1,1,2,2,2,2,4,4,8,8,8,16,16,16,16,16,32,32,32,32,32,32,64,64,64,128,128,128; if (.@good_luck == 7 || .@good_luck == 77 || .@good_luck == 777 || .@good_luck == 7777) - set .@bonus,1; - for(set .@i,0; .@i<getarraysize(.@wishes$); set .@i,.@i+1) { + .@bonus = 1; + for(.@i = 0; .@i<getarraysize(.@wishes$); ++.@i) { if (compare(.@wish$,.@wishes$[.@i])) { - set .@stat, .@stat | .@index[.@i]; + .@stat |= .@index[.@i]; break; } } diff --git a/npc/re/cities/izlude.txt b/npc/re/cities/izlude.txt index 7e37f9de2..6c6734cd1 100644 --- a/npc/re/cities/izlude.txt +++ b/npc/re/cities/izlude.txt @@ -89,7 +89,7 @@ function script F_IzludeChannel { mes "I can send you to another copy of Izlude."; mes "Do you want to go to another copy?"; next; - set .@i, select(getarg(0)+":Never mind"); + .@i = select(getarg(0)+":Never mind"); if (.@i < 6) { setarray .@maps$[1],"izlude","izlude_a","izlude_b","izlude_c","izlude_d"; savepoint .@maps$[.@i],128,98; diff --git a/npc/re/cities/malangdo.txt b/npc/re/cities/malangdo.txt index 5a651c090..7e597a140 100644 --- a/npc/re/cities/malangdo.txt +++ b/npc/re/cities/malangdo.txt @@ -27,7 +27,7 @@ mes "We are sent to here to take you to the heaven of cats, ^A2314BMalangdo^000000."; next; mes "[Dolangmal]"; - set .@s$,"Why don't you go to ^A2314BMalangdo^000000?"; + .@s$ = "Why don't you go to ^A2314BMalangdo^000000?"; switch(atoi(strnpcinfo(2))) { case 1: mes "How is that? The crowded city of Prontera is good, but why don't you go our heaven of the cats, ^A2314BMalangdo^000000?"; break; case 2: mes "Why don't you go to ^A2314BMalangdo^000000? That place is better than Geffen, where there are only crowds of simple honest wizards."; break; @@ -165,17 +165,17 @@ mora,57,150,4 duplicate(Dolangmal) Dolangmal#9 4_CAT_DOWN mes "Meow? Huh?"; next; if (ep13_yong1 == 0) { - set .@price,1000; - set .@s1$,"Huh! You are so annoying. Let me send you to ^A2314BMalangdo^000000 for ^0000FF1000 Zeny^000000."; - set .@s2$,"Money? Where is the money? You can't go anywhere without the money. Shame on you."; + .@price = 1000; + .@s1$ = "Huh! You are so annoying. Let me send you to ^A2314BMalangdo^000000 for ^0000FF1000 Zeny^000000."; + .@s2$ = "Money? Where is the money? You can't go anywhere without the money. Shame on you."; } else if (ep13_yong1 < 60) { - set .@price,999; - set .@s1$,"You have a little relationship with fleet of cat. I'll give you special discount price ^0000FF999 Zeny^000000 to ^A2314BMalangdo^000000, because you have relationship with fleet."; - set .@s2$,"Where is the money? You don't have a sense of honor."; + .@price = 999; + .@s1$ = "You have a little relationship with fleet of cat. I'll give you special discount price ^0000FF999 Zeny^000000 to ^A2314BMalangdo^000000, because you have relationship with fleet."; + .@s2$ = "Where is the money? You don't have a sense of honor."; } else if (ep13_yong1 > 59 && ep13_yong1 < 80) { - set .@price,500; - set .@s1$,"You gave several help to our cat's fleet so let me give you special that with 50% discount price ^0000FF500 Zeny^000000. I'll send you to ^A2314BMalangdo^000000."; - set .@s2$,"You don't have any money for paying 50% discount price? I can't believe it."; + .@price = 500; + .@s1$ = "You gave several help to our cat's fleet so let me give you special that with 50% discount price ^0000FF500 Zeny^000000. I'll send you to ^A2314BMalangdo^000000."; + .@s2$ = "You don't have any money for paying 50% discount price? I can't believe it."; } else { mes "[Odgnalam]"; mes "You are a hero of cat's fleet. Your activity is the legend between us."; @@ -218,36 +218,36 @@ malangdo,219,86,4 script Kong#malang 4_CAT_SAILOR2,{ mes "The fleet has a service to Izlude and Alberta."; next; if (ep13_yong1 == 0) { - set .@price,1000; - set .@s1$, "1000 zeny"; - set .@s2$, "Have a nice day in Malangdo."; - set .@no_money$, "It is difficult for free."; - set .@yes_money$, "Have a nice trip."; + .@price = 1000; + .@s1$ = "1000 zeny"; + .@s2$ = "Have a nice day in Malangdo."; + .@no_money$ = "It is difficult for free."; + .@yes_money$ = "Have a nice trip."; mes "[Kong]"; mes "The fee of ship is only 1000 zeny, where do you want to go?"; next; } else if (ep13_yong1 < 60) { - set .@price,999; - set .@s1$,"999 zeny"; - set .@s2$, "Have a full of fortune day in Malangdo..."; - set .@no_money$, "It is difficult even though you have a relationship with the fleet."; - set .@yes_money$, "Thanks, have a wonderful trip."; + .@price = 999; + .@s1$ = "999 zeny"; + .@s2$ = "Have a full of fortune day in Malangdo..."; + .@no_money$ = "It is difficult even though you have a relationship with the fleet."; + .@yes_money$ = "Thanks, have a wonderful trip."; mes "[Kong]"; mes "You have a connection with our fleet. Apply special price 999 zeny. Where do you want to go?"; next; } else if (ep13_yong1 > 59 && ep13_yong1 < 80) { - set .@price,500; - set .@s1$,"500 zeny"; - set .@s2$, "There are full of fortune and jackpot in Malangdo."; - set .@no_money$, "Oh my god. You don't have 500 zeny? It is difficult for free."; - set .@yes_money$, "Have a nice trip and come again."; + .@price = 500; + .@s1$ = "500 zeny"; + .@s2$ = "There are full of fortune and jackpot in Malangdo."; + .@no_money$ = "Oh my god. You don't have 500 zeny? It is difficult for free."; + .@yes_money$ = "Have a nice trip and come again."; mes "[Kong]"; mes "Wow~ You contributed to our fleet a lot. Alright!! Special discount price 500 zeny. Where do you want to go?"; next; } else { - set .@price,0; - set .@s1$,"Free for the hero of our fleet!!"; - set .@s2$, "No one objects to the hero of our fleet staying in Malangdo..."; + .@price = 0; + .@s1$ = "Free for the hero of our fleet!!"; + .@s2$ = "No one objects to the hero of our fleet staying in Malangdo..."; mes "[Kong]"; mes "Ah... You are the legendary hero of our cat's fleet."; next; @@ -255,7 +255,7 @@ malangdo,219,86,4 script Kong#malang 4_CAT_SAILOR2,{ mes "We can't charge the hero of our fleet. What is your destination?"; next; } - set .@i, select("- Izlude destination --- "+.@s1$+":- Alberta destination --- "+.@s1$+":- Stay on Malangdo"); + .@i = select("- Izlude destination --- "+.@s1$+":- Alberta destination --- "+.@s1$+":- Stay on Malangdo"); mes "[Kong]"; if (.@i == 3) { mes .@s2$; diff --git a/npc/re/cities/malaya.txt b/npc/re/cities/malaya.txt index 54064d8a5..f806d4908 100644 --- a/npc/re/cities/malaya.txt +++ b/npc/re/cities/malaya.txt @@ -142,9 +142,9 @@ OnInit: case 9: setarray .@npc$,"09","10","11"; break; default: end; } - set .@size, getarraysize(.@npc$); - set .@rand, rand(.@size); - for(set .@i,0; .@i<.@size; set .@i,.@i+1) + .@size = getarraysize(.@npc$); + .@rand = rand(.@size); + for(.@i = 0; .@i<.@size; ++.@i) donpcevent "Unidentified Creature#"+.@npc$[.@i]+"::"+((.@i == .@rand)?"OnEnable":"OnDisable"); end; OnEnable: @@ -159,9 +159,9 @@ OnBingx2: case 5: setarray .@npc$,"06","07","08"; break; case 9: setarray .@npc$,"10","11"; break; } - set .@size, getarraysize(.@npc$); - set .@rand, rand(.@size); - for(set .@i,0; .@i<.@size; set .@i,.@i+1) + .@size = getarraysize(.@npc$); + .@rand = rand(.@size); + for(.@i = 0; .@i<.@size; ++.@i) donpcevent "Unidentified Creature#"+.@npc$[.@i]+"::"+((.@i == .@rand)?"OnEnable":"OnDisable"); donpcevent strnpcinfo(0)+"::OnDisable"; end; @@ -174,9 +174,9 @@ OnTouch: } if (rand(1,5)%2) { switch(atoi(strnpcinfo(2))) { - case 1: set $ma_name04$,strcharinfo(0); break; - case 5: set $ma_name05$,strcharinfo(0); break; - case 9: set $ma_name06$,strcharinfo(0); break; + case 1: $ma_name04$ = strcharinfo(0); break; + case 5: $ma_name05$ = strcharinfo(0); break; + case 9: $ma_name06$ = strcharinfo(0); break; } } donpcevent strnpcinfo(0)+"::OnBingx2"; @@ -210,23 +210,23 @@ OnBingx2: case 10: setarray .@npc$,"09","11"; break; case 11: setarray .@npc$,"09","10"; break; } - set .@size, getarraysize(.@npc$); - set .@rand, rand(.@size); - for(set .@i,0; .@i<.@size; set .@i,.@i+1) + .@size = getarraysize(.@npc$); + .@rand = rand(.@size); + for(.@i = 0; .@i<.@size; ++.@i) donpcevent "Unidentified Creature#"+.@npc$[.@i]+"::"+((.@i == .@rand)?"OnEnable":"OnDisable"); donpcevent strnpcinfo(0)+"::OnDisable"; end; OnTouch: - set .@i, atoi(strnpcinfo(2)); + .@i = atoi(strnpcinfo(2)); if (.@i%4 == 2) { if (getcharid(0) == getpartyleader(getcharid(1),2)) - set .@pass,1; + .@pass = 1; } else if (.@i%4 == 3) { if (questprogress(4229,PLAYTIME) && questprogress(9223,PLAYTIME) && questprogress(12278,PLAYTIME)) - set .@pass,1; + .@pass = 1; } else if (.@i%4 == 0) { if (rand(1,100)%10 == 7) - set .@pass,1; + .@pass = 1; } if (.@pass) { if ($ma_name04$ == strcharinfo(0) || $ma_name05$ == strcharinfo(0) || $ma_name06$ == strcharinfo(0)) { @@ -239,16 +239,16 @@ OnTouch: case 2: case 3: case 4: - set $ma_name04$,strcharinfo(0); + $ma_name04$ = strcharinfo(0); break; case 6: case 7: case 8: - set $ma_name05$,strcharinfo(0); + $ma_name05$ = strcharinfo(0); break; case 10: case 11: - set $ma_name06$,strcharinfo(0); + $ma_name06$ = strcharinfo(0); break; } } @@ -438,7 +438,7 @@ malaya,88,252,4 script Little Girl#ma04 4_F_BARYO_GIRL,{ close; } if (rand(1,3) == 2) { - set .@name$, getd("$ma_name0"+rand(1,6)+"$"); + .@name$ = getd("$ma_name0"+rand(1,6)+"$"); mes "[Little Girl]"; mes "A little while ago "+.@name$+" came and told me a fun story."; next; @@ -513,7 +513,7 @@ malaya,363,283,4 script Local#ma06 4_M_MALAYA,{ mes "The village is chaotic these days. If you see someone with red eyes, try not to stare at their eyes."; close; } - set .@name$, getd("$ma_name0"+rand(1,6)+"$"); + .@name$ = getd("$ma_name0"+rand(1,6)+"$"); switch(rand(1,6)) { case 1: mes "[Local]"; @@ -611,8 +611,8 @@ malaya,63,185,4 script Woman#ma08 4_F_MALAYA,{ close; } if (rand(1,3) == 2) { - set .@name$, getd("$ma_name0"+rand(1,6)+"$"); - set .@rand, rand(1,10); + .@name$ = getd("$ma_name0"+rand(1,6)+"$"); + .@rand = rand(1,10); if (.@rand < 5) { mes "[Woman]"; mes "I like fun stories. Not so long ago, "+.@name$+" came and told me a funny story."; @@ -747,19 +747,19 @@ function script F_Malaya_Jeepney { viewpoint 1, 237, 240, 1, 0xF7E009; viewpoint 1, 67 , 44 , 2, 0xF7E009; viewpoint 1, 282, 129, 3, 0xF7E009; - set .@zif_in, 12; + .@zif_in = 12; break; case 2: viewpoint 1, 134, 250, 4, 0xF7E009; viewpoint 1, 341, 153, 5, 0xF7E009; viewpoint 1, 293, 290, 6, 0xF7E009; - set .@zif_in, 30; + .@zif_in = 30; break; case 3: viewpoint 1, 242, 221, 7, 0xF7E009; viewpoint 1, 62 , 245, 8, 0xF7E009; viewpoint 1, 257, 58 , 9, 0xF7E009; - set .@zif_in, 60; + .@zif_in = 60; break; } mes "[Jeepney Driver]"; diff --git a/npc/re/guides/guides_alberta.txt b/npc/re/guides/guides_alberta.txt index 94c95279c..2f7c2320b 100644 --- a/npc/re/guides/guides_alberta.txt +++ b/npc/re/guides/guides_alberta.txt @@ -20,11 +20,11 @@ alberta,23,238,4 script Guide#01alberta::AlbertaGuide 8W_SOLDIER,{ mes "Do you need help navigating the city?"; F_Navi("[Alberta Guide]"); next; - set .@str$,"Would you like to check any other locations?"; + .@str$ = "Would you like to check any other locations?"; while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:[ Destination Ports ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Tool Shop ]:[ Forge ]:[ Weapon & Armor Shop ]:[ Inn ]:[ Beauty Salon ]:[ Merchant Guild ]:Previous Menu")) { case 1: @@ -82,13 +82,13 @@ alberta,23,238,4 script Guide#01alberta::AlbertaGuide 8W_SOLDIER,{ next; break; case 7: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Kafra Employee ]:[ Cool Event Employee ]:[ Bullet Merchant ]:[ Cooking Ingredient Merchant ]:Previous Menu")) { case 1: @@ -138,13 +138,13 @@ alberta,23,238,4 script Guide#01alberta::AlbertaGuide 8W_SOLDIER,{ next; break; case 6: - set .@loop,0; + .@loop = 0; break; } } break; case 3: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Port - Northern Dock ]:[ Port - Central Dock ]:[ Port - Southern Dock ]:Previous Menu")) { case 1: @@ -172,7 +172,7 @@ alberta,23,238,4 script Guide#01alberta::AlbertaGuide 8W_SOLDIER,{ next; break; case 4: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_aldebaran.txt b/npc/re/guides/guides_aldebaran.txt index ef47d543d..174e14499 100644 --- a/npc/re/guides/guides_aldebaran.txt +++ b/npc/re/guides/guides_aldebaran.txt @@ -21,11 +21,11 @@ aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 8W_SOLDIER,{ mes "Do you need help navigating the city?"; F_Navi("[Al De Baran Guide]"); next; - set .@str$,"Would you like to check any other locations?"; + .@str$ = "Would you like to check any other locations?"; while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Kafra Headquarters ]:[ Alchemist Guild ]:[ Clock Tower ]:[ Inn & Tool Shop ]:[ Repair & Buy Equipment ]:[ Tavern ]:Previous Menu")) { case 1: @@ -70,13 +70,13 @@ aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 8W_SOLDIER,{ next; break; case 7: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Kafra Employee ]:[ Mr. Claus ]:[ Chef Assistant ]:Previous Menu")) { case 1: @@ -107,7 +107,7 @@ aldebaran,139,63,4 script Guide#01aldebaran::GuideAldearan 8W_SOLDIER,{ next; break; case 5: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_ayothaya.txt b/npc/re/guides/guides_ayothaya.txt index 6d351d4d6..ef3e7bbc7 100644 --- a/npc/re/guides/guides_ayothaya.txt +++ b/npc/re/guides/guides_ayothaya.txt @@ -15,9 +15,9 @@ ayothaya,203,169,4 script Ayothaya Guide Noi#01ay 4_F_THAIGIRL,{ if (strnpcinfo(0) == "Ayothaya Guide Noi#01ay") - set .@n$, "[Noi]"; + .@n$ = "[Noi]"; else - set .@n$, "[Noa]"; + .@n$ = "[Noa]"; mes .@n$; mes "Hello~"; mes "Welcome to ^8B4513Ayothaya^000000."; diff --git a/npc/re/guides/guides_comodo.txt b/npc/re/guides/guides_comodo.txt index 6b584714e..97d2c028a 100644 --- a/npc/re/guides/guides_comodo.txt +++ b/npc/re/guides/guides_comodo.txt @@ -23,7 +23,7 @@ comodo,322,178,4 script Comodo Guide#01comodo::GuideComodo 8_F_GIRL,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel:About ^8B4513Comodo^000000")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Tavern ]:[ Casino ]:[ Weapon & Armor Shop ]:[ Tool Shop ]:[ Campsite ]:[ Souvenir Vendor ]:[ East Cave Mao ]:[ West Cave Karu ]:[ North Cave Ruanda ]:[ Hula Dance Stage ]:[ Kafra Co. Western Branch ]:Previous Menu")) { case 1: @@ -86,13 +86,13 @@ comodo,322,178,4 script Comodo Guide#01comodo::GuideComodo 8_F_GIRL,{ next; break; case 12: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Chief's House ]:[ Bor Robin ]:[ Kafra Employee ]:[ Roaming Bard ]:Previous Menu")) { case 1: @@ -122,7 +122,7 @@ comodo,322,178,4 script Comodo Guide#01comodo::GuideComodo 8_F_GIRL,{ next; break; case 5: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_einbroch.txt b/npc/re/guides/guides_einbroch.txt index 697450f51..fc52983ca 100644 --- a/npc/re/guides/guides_einbroch.txt +++ b/npc/re/guides/guides_einbroch.txt @@ -25,7 +25,7 @@ einbroch,72,202,4 script Einbroch Guide#ein01::GuideEinbroch 4_M_EIN_SOLDIER,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Airport ]:[ Factory ]:[ Plaza ]:[ Hotel ]:[ Train Station ]:[ Weapon Shop ]:[ Laboratory ]:[ Monument ]:[ Blacksmith Guild ]:[ Gunslinger Guild ]:Previous Menu")) { case 1: @@ -124,13 +124,13 @@ einbroch,72,202,4 script Einbroch Guide#ein01::GuideEinbroch 4_M_EIN_SOLDIER,{ next; break; case 11: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Armsmith ]:[ Kafra Employees ]:[ Eden Teleport Officer ]:Previous Menu")) { case 1: @@ -172,7 +172,7 @@ einbroch,72,202,4 script Einbroch Guide#ein01::GuideEinbroch 4_M_EIN_SOLDIER,{ next; break; case 4: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_geffen.txt b/npc/re/guides/guides_geffen.txt index 3bcd4db5b..67985d380 100644 --- a/npc/re/guides/guides_geffen.txt +++ b/npc/re/guides/guides_geffen.txt @@ -24,7 +24,7 @@ geffen,203,116,4 script Guide#01geffen::GuideGeffen 4_M_GEF_SOLDIER,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Magic Academy ]:[ Geffen Tower ]:[ Fountain ]:[ Tool Shop ]:[ Buy & Repair Equipment ]:[ Inn ]:[ Tavern ]:[ Christopher's Forge ]:Previous Menu")) { case 1: @@ -84,13 +84,13 @@ geffen,203,116,4 script Guide#01geffen::GuideGeffen 4_M_GEF_SOLDIER,{ next; break; case 9: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Kafra Employee ]:[ Pet Groomer ]:[ Chef Assistant ]:[ Dimensional Arcanist Guide ]:Previous Menu")) { case 1: @@ -121,7 +121,7 @@ geffen,203,116,4 script Guide#01geffen::GuideGeffen 4_M_GEF_SOLDIER,{ next; break; case 6: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_hugel.txt b/npc/re/guides/guides_hugel.txt index 0544ead01..7781848ab 100644 --- a/npc/re/guides/guides_hugel.txt +++ b/npc/re/guides/guides_hugel.txt @@ -20,11 +20,11 @@ hugel,98,56,3 script Hugel Guide Granny#hugel 4_F_LGTGRAND,{ mes "If this is the first time for you to use the guide services, you should ask a lot of questions."; F_Navi("[Hugel Guide Granny]"); next; - set .@str$,"Would you like to know more locations?"; + .@str$ = "Would you like to know more locations?"; while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Church ]:[ Inn ]:[ Pub ]:[ Airport ]:[ Weapon Shop ]:[ Tool Shop ]:[ Bingo Game Room ]:[ ^3131FFHunter Guild^000000 ]:[ Party Supplies Shop ]:[ ^3131FFShrine Expedition^000000 ]:Previous Menu")) { case 1: @@ -111,13 +111,13 @@ hugel,98,56,3 script Hugel Guide Granny#hugel 4_F_LGTGRAND,{ next; break; case 11: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Monster Race Arena ]:[ Cool Event Corp. Staff ]:Previous Menu")) { case 1: @@ -138,7 +138,7 @@ hugel,98,56,3 script Hugel Guide Granny#hugel 4_F_LGTGRAND,{ next; break; case 3: - set .@loop,0; + .@loop = 0; break; } } @@ -184,7 +184,7 @@ hugel,187,172,6 script Guide Rich King#hugel 4_M_CRU_KNT,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Church ]:[ Inn ]:[ Pub ]:[ Airport ]:[ Weapon Shop ]:[ Tool Shop ]:[ Bingo Game Room ]:[ Hunter Guild ]:[ Party Supplies Shop ]:[ Shrine Expedition ]:Previous Menu")) { case 1: @@ -238,13 +238,13 @@ hugel,187,172,6 script Guide Rich King#hugel 4_M_CRU_KNT,{ next; break; case 11: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Monster Race Arena ]:[ Cool Event Corp. Staff ]:Previous Menu")) { case 1: @@ -258,7 +258,7 @@ hugel,187,172,6 script Guide Rich King#hugel 4_M_CRU_KNT,{ next; break; case 3: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_izlude.txt b/npc/re/guides/guides_izlude.txt index a3a37537b..87987faad 100644 --- a/npc/re/guides/guides_izlude.txt +++ b/npc/re/guides/guides_izlude.txt @@ -24,11 +24,11 @@ mes "Do you need help navigating the town?"; F_Navi("[Izlude Guide]"); next; - set .@map$, strnpcinfo(4); + .@map$ = strnpcinfo(4); while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Cryptura Academy ]:[ Marina ]:[ International Airship ]:[ Arena ]:[ Kit Shop ]:[ Swordsman Guild ]:[ Enchant Association ]:[ Forge ]:Previous Menu")) { case 1: @@ -95,13 +95,13 @@ next; break; case 9: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Kafra Employee ]:[ Hypnotist ]:[ Newlywed Helper ]:[ Mercenary Guildsman ]:[ Pet Groomer ]:Previous Menu")) { case 1: @@ -145,7 +145,7 @@ next; break; case 7: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_juno.txt b/npc/re/guides/guides_juno.txt index dc85f0743..f62013147 100644 --- a/npc/re/guides/guides_juno.txt +++ b/npc/re/guides/guides_juno.txt @@ -22,7 +22,7 @@ yuno,59,212,4 script Juno Guide#yuno01::GuideJuno 8_F_GIRL,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Tool Shop ]:[ Forge ]:[ Airport ]:[ Government Building ]:[ Street of Book Stores ]:[ Inn & Pub ]:[ Sage Castle ]:[ Monster Academy ]:[ Library of the Republic ]:[ Weapon & Armor Shop ]:[ Juphero Plaza ]:[ Monster Museum ]:[ Schweicherbil Magic Academy ]:Previous Menu")) { case 1: @@ -95,13 +95,13 @@ yuno,59,212,4 script Juno Guide#yuno01::GuideJuno 8_F_GIRL,{ next; break; case 14: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Kafra Employees ]:[ Eden Teleport Officer ]:Previous Menu")) { case 1: @@ -117,7 +117,7 @@ yuno,59,212,4 script Juno Guide#yuno01::GuideJuno 8_F_GIRL,{ next; break; case 3: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_lighthalzen.txt b/npc/re/guides/guides_lighthalzen.txt index d7cd22aae..668ac4d08 100644 --- a/npc/re/guides/guides_lighthalzen.txt +++ b/npc/re/guides/guides_lighthalzen.txt @@ -35,7 +35,7 @@ lighthalzen,207,310,5 script Lighthalzen Guide#lhz01::GuideLighthazlen 4_M_EIN_S while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Hotel ]:[ Bank ]:[ Airport ]:[ Weapon Shop ]:[ Department Store ]:[ Police Station ]:[ Jewelry Store ]:[ Cool Event Corp. ]:[ Somatology Laboratory ]:[ Alchemist Association ]:Previous Menu")) { case 1: @@ -89,13 +89,13 @@ lighthalzen,207,310,5 script Lighthalzen Guide#lhz01::GuideLighthazlen 4_M_EIN_S next; break; case 11: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Armsmith ]:[ Seiayablem ]:[ Pet Groomer ]:[ Kafra Employees ]:[ Cool Event Corp. Staff ]:Previous Menu")) { case 1: @@ -136,7 +136,7 @@ lighthalzen,207,310,5 script Lighthalzen Guide#lhz01::GuideLighthazlen 4_M_EIN_S next; break; case 6: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_louyang.txt b/npc/re/guides/guides_louyang.txt index f79039e32..2e043364a 100644 --- a/npc/re/guides/guides_louyang.txt +++ b/npc/re/guides/guides_louyang.txt @@ -26,7 +26,7 @@ louyang,224,104,4 script Louyang Guide#01louyang 4_F_CHNWOMAN,{ mes "^8B4513Louyang^000000 is famous for"; mes "its elaborate history, as well as specialties that are unique to this nation. Please take your time and enjoy your stay."; F_Navi("[Representative]"); - set .@str$,"Is there anything else I can do for you?"; + .@str$ = "Is there anything else I can do for you?"; while (1) { next; switch(select("[ Dragon Castle ]:[ Doctor's Office ]:[ City Hall ]:[ Weapon Shop ]:[ Tool Shop ]:[ Tavern ]:[ Observatory ]:[ Return to Alberta ]:Remove Marks from Mini-Map:Cancel")) { diff --git a/npc/re/guides/guides_morroc.txt b/npc/re/guides/guides_morroc.txt index 55b1ef58e..fb85d97c5 100644 --- a/npc/re/guides/guides_morroc.txt +++ b/npc/re/guides/guides_morroc.txt @@ -24,7 +24,7 @@ morocc,153,286,6 script Guide#01morocc::GuideMorroc 4_M_MOC_SOLDIER,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Thief Guild ]:[ Sphinx Dungeon ]:[ Oasis Entrance ]:[ Forge ]:[ Weapon & Armor Shop ]:[ Inn ]:[ Tavern ]:Previous Menu")) { case 1: @@ -78,13 +78,13 @@ morocc,153,286,6 script Guide#01morocc::GuideMorroc 4_M_MOC_SOLDIER,{ next; break; case 8: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Kafra Employee ]:[ Poison Herb Salesman ]:[ Dye Maker ]:[ Seiyablem ]:Previous Menu")) { case 1: @@ -121,7 +121,7 @@ morocc,153,286,6 script Guide#01morocc::GuideMorroc 4_M_MOC_SOLDIER,{ next; break; case 5: - set .@loop,0; + .@loop = 0; break; } } @@ -176,7 +176,7 @@ moc_ruins,159,53,3 script Guide#01ruins::GuideMocRuins 4_M_MOC_SOLDIER,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Thief Guild ]:[ Sphinx Dungeon ]:[ Morroc Entrance ]:Previous Menu")) { case 1: @@ -208,13 +208,13 @@ moc_ruins,159,53,3 script Guide#01ruins::GuideMocRuins 4_M_MOC_SOLDIER,{ next; break; case 4: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Tool Dealer ]:[ Kafra Employee ]:[ Repairman ]:[ Pet Groomer ]:[ Chef Assistant ]:[ Leablem ]:Previous Menu")) { case 1: @@ -265,7 +265,7 @@ moc_ruins,159,53,3 script Guide#01ruins::GuideMocRuins 4_M_MOC_SOLDIER,{ next; break; case 8: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_moscovia.txt b/npc/re/guides/guides_moscovia.txt index 05664c06a..1f8810878 100644 --- a/npc/re/guides/guides_moscovia.txt +++ b/npc/re/guides/guides_moscovia.txt @@ -21,7 +21,7 @@ moscovia,161,76,3 script Moscovia Guide#01mosc 4_F_RUSWOMAN1,{ mes "I'm supporting to offer information about here."; mes "If you want to ask anything just feel free tell me."; F_Navi("[Moscovia Guide]"); - set .@str$,"Is there anything else I can do for you?"; + .@str$ = "Is there anything else I can do for you?"; while (1) { next; switch(select("[ Kafra Employee ]:[ Palace ]:[ Chapel ]:[ Weapon Shop ]:[ Armor Shop ]:[ Tool Shop ]:[ Inn ]:[ Return to Alberta ]:Remove Marks from Mini-Map:Cancel")) { diff --git a/npc/re/guides/guides_payon.txt b/npc/re/guides/guides_payon.txt index a165ad455..b363a1dba 100644 --- a/npc/re/guides/guides_payon.txt +++ b/npc/re/guides/guides_payon.txt @@ -24,7 +24,7 @@ payon,163,64,3 script Guide#01payon::GuidePayon 4_M_PAY_SOLDIER,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Archer Village ]:[ Tool Shop ]:[ Weapon & Armor Shop ]:[ Inn & Tavern ]:[ Central Palace ]:[ Palace Court ]:[ Royal Kitchen ]:Previous Menu")) { case 1: @@ -67,13 +67,13 @@ payon,163,64,3 script Guide#01payon::GuidePayon 4_M_PAY_SOLDIER,{ next; break; case 8: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Kafra Shop ]:[ Repair / Armsmith ]:[ Kafra Employee ]:[ Trap Specialist ]:[ Seiayblem ]:[ Leablem ]:[ Jade ]:[ Pet Groomer ]:[ Chef Assistant ]:Previous Menu")) { case 1: @@ -144,7 +144,7 @@ payon,163,64,3 script Guide#01payon::GuidePayon 4_M_PAY_SOLDIER,{ next; break; case 11: - set .@loop,0; + .@loop = 0; break; } } @@ -203,7 +203,7 @@ pay_arche,86,33,4 script Guide#05payon 4_M_PAY_SOLDIER,{ mes "Do you need help navigating the village?"; F_Navi("[Payon Guide]"); next; - set .@str$,"Would you like to check any other locations?"; + .@str$ = "Would you like to check any other locations?"; while (1) { switch(select("[ Payon Dungeon ]:[ Archer Guild ]:[ Tool Shop ]:[ Kafra Employee ]:[ Mercenary Guildsman ]:[ Alchemist Guildsman ]:[ Eden Teleport Officer ]:Remove Marks from Mini-Map:Cancel")) { case 1: diff --git a/npc/re/guides/guides_prontera.txt b/npc/re/guides/guides_prontera.txt index c3ecea92f..58b5eecbe 100644 --- a/npc/re/guides/guides_prontera.txt +++ b/npc/re/guides/guides_prontera.txt @@ -22,11 +22,11 @@ prontera,154,187,4 script Guide#01prontera::GuideProntera 8W_SOLDIER,{ mes "Do you need help navigating the city?"; F_Navi("[Prontera Guide]"); next; - set .@str$,"Would you like to check any other locations?"; + .@str$ = "Would you like to check any other locations?"; while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Tool Shop ]:[ Weapon & Armor Shop ]:[ Forge ]:[ Sanctuary ]:[ Chivalry Office ]:[ Inn ]:[ Tavern ]:[ Library ]:[ Prontera Castle ]:[ Job Agency ]:[ City Hall ]:Previous Menu")) { case 1: @@ -119,13 +119,13 @@ prontera,154,187,4 script Guide#01prontera::GuideProntera 8W_SOLDIER,{ next; break; case 12: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Eden Teleport Officer ]:[ Peco Peco Breeder ]:[ Riding Creature Master ]:[ Magic Gear Master ]:[ Peco Peco Remover ]:[ Trading Merchants ]:[ Mercenary Guildsman ]:[ Hypnotist ]:[ Kafra Employee ]:[ Leablem ]:[ Apprentice Craftsman ]:[ Pet Groomer ]:Previous Menu")) { case 1: @@ -234,7 +234,7 @@ prontera,154,187,4 script Guide#01prontera::GuideProntera 8W_SOLDIER,{ next; break; case 13: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/guides_rachel.txt b/npc/re/guides/guides_rachel.txt index f7f1a2c87..28a3c1bd6 100644 --- a/npc/re/guides/guides_rachel.txt +++ b/npc/re/guides/guides_rachel.txt @@ -21,7 +21,7 @@ rachel,138,146,5 script Rachel Guide#rachel 4_M_RASWORD,{ while (1) { switch(select("[ Main Facilities ]:[ Merchants & Helpers ]:Remove Marks from Mini-Map:Cancel")) { case 1: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Inn ]:[ Weapon Shop ]:[ Tool Shop ]:[ Airport ]:[ Cheshrumnir ]:[ Priest Zed's Mansion ]:Previous Menu")) { case 1: @@ -70,13 +70,13 @@ rachel,138,146,5 script Rachel Guide#rachel 4_M_RASWORD,{ next; break; case 7: - set .@loop,0; + .@loop = 0; break; } } break; case 2: - set .@loop,1; + .@loop = 1; while (.@loop) { switch(select("[ Cool Event Corp. Staff ]:[ Eden Teleport Officer ]:Previous Menu")) { case 1: @@ -98,7 +98,7 @@ rachel,138,146,5 script Rachel Guide#rachel 4_M_RASWORD,{ next; break; case 3: - set .@loop,0; + .@loop = 0; break; } } diff --git a/npc/re/guides/navigation.txt b/npc/re/guides/navigation.txt index b7bde6aab..b0263c93f 100644 --- a/npc/re/guides/navigation.txt +++ b/npc/re/guides/navigation.txt @@ -15,7 +15,7 @@ function script F_Navi { // Uncomment to disable the navigation system. - //set .@disabled,1; + //.@disabled = 1; // This function takes 0 ~ 3 parameters. switch(getargcount()) { diff --git a/npc/re/guild/invest_main.txt b/npc/re/guild/invest_main.txt index 6661de45f..9ed49ce7a 100644 --- a/npc/re/guild/invest_main.txt +++ b/npc/re/guild/invest_main.txt @@ -63,13 +63,13 @@ $@vfund_*_extra - script #invest_timer -1,{ OnClock0000: // Open investments on Wed (1 hour after WoE) if (gettime(4) == 3 && !agitcheck()) { - set $2011_agit_invest,1; + $2011_agit_invest = 1; donpcevent "#fund_master::OnInvest_start"; } end; OnClock1200: // Close investments on Fri (60 hours after investments open) if (gettime(4) == 5 && !agitcheck()) { - set $2011_agit_invest,2; + $2011_agit_invest = 2; donpcevent "#fund_master::OnInvest_stop"; } end; @@ -84,9 +84,9 @@ OnClock2000: // Close dungeons on Tues (1 hour before WoE) } function script F_Invest_Status { - set .@day, gettime(4); - set .@hour, gettime(3); - set .@minute, gettime(2); + .@day = gettime(4); + .@hour = gettime(3); + .@minute = gettime(2); // Inactive. if (agitcheck()) @@ -123,13 +123,13 @@ function script F_Invest_Abyss { next; switch(select("1 unit 10,000 Zeny:10 units 100,000 Zeny:50 units 500,000 Zeny:Another amount:Cancel")) { case 1: - set .@units,1; + .@units = 1; break; case 2: - set .@units,10; + .@units = 10; break; case 3: - set .@units,50; + .@units = 50; break; case 4: mes getarg(1); @@ -154,7 +154,7 @@ function script F_Invest_Abyss { mes "Canceled."; close; } - set .@zeny, .@units * 10000; + .@zeny = .@units * 10000; if (Zeny < .@zeny) { mes getarg(1); mes "You do not have enough money."; @@ -174,10 +174,10 @@ function script F_Invest_Abyss { next; switch(select("1 Investment Certificate:5 Investment Certificates:Another amount:Cancel")) { case 1: - set .@tickets,1; + .@tickets = 1; break; case 2: - set .@tickets,5; + .@tickets = 5; break; case 3: mes getarg(1); @@ -207,7 +207,7 @@ function script F_Invest_Abyss { mes "Looks like you have fewer Investment Certificates than you want to submit."; close; } - set .@units, .@tickets * 10; + .@units = .@tickets * 10; mes getarg(1); mes .@tickets+" Investment Certificate"+((.@tickets == 1)?" is":"s are")+" the same as an investment of "+.@units+" units ("+((.@units < 100)?.@units:insertchar(""+.@units,",",1))+"0,000z)"+getarg(2,"")+"."; mes "Not much but this is a small gift. You can exchange it with items in Malangdo."; @@ -227,9 +227,9 @@ function script F_Invest_Abyss { prt_gld,1,1,0 script #fund_master CLEAR_NPC,{ end; OnInit: - set .@invest_status, callfunc("F_Invest_Status"); + .@invest_status = callfunc("F_Invest_Status"); if (.@invest_status == 1) { - set $2011_agit_invest,1; + $2011_agit_invest = 1; end; } if ((.@invest_status == 2 && $2011_agit_invest == 1) || @@ -239,22 +239,22 @@ OnInit: } end; OnCalculate_Election: - set .@force_vote,1; + .@force_vote = 1; OnCalculate: setarray .@cas$[0],"prt","pay","gef","alde"; - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { // All funds per realm are summed. - set .@funds[.@i], getd("$fund_"+.@cas$[.@i]+"01")+getd("$fund_"+.@cas$[.@i]+"02")+getd("$fund_"+.@cas$[.@i]+"03")+getd("$fund_"+.@cas$[.@i]+"04")+getd("$fund_"+.@cas$[.@i]+"05")+getd("$fund_"+.@cas$[.@i]+"_extra"); + .@funds[.@i] = getd("$fund_"+.@cas$[.@i]+"01")+getd("$fund_"+.@cas$[.@i]+"02")+getd("$fund_"+.@cas$[.@i]+"03")+getd("$fund_"+.@cas$[.@i]+"04")+getd("$fund_"+.@cas$[.@i]+"05")+getd("$fund_"+.@cas$[.@i]+"_extra"); // 70,000,000z opens Hall of Abyss and F2. if (.@funds[.@i] >= 7000) { setd "$"+.@cas$[.@i]+"_invest_result",3; - set .@total_7000,1; + .@total_7000 = 1; } // 20,000,000z opens F2 and a chance for Hall of Abyss. else if (.@funds[.@i] >= 2000) { setd "$"+.@cas$[.@i]+"_invest_result",2; - set .@total_2000,1; + .@total_2000 = 1; } // Anything below that opens nothing. else @@ -265,20 +265,20 @@ OnCalculate: end; // No further actions if any realm hits 70,000,000z. if (.@total_7000) { - set $2011_agit_invest,4; + $2011_agit_invest = 4; end; } // Otherwise, highest investment above 20,000,000z opens Hall of Abyss. - set .@max, .@funds[0]; - for(set .@i,1; .@i<4; set .@i,.@i+1) { + .@max = .@funds[0]; + for(.@i = 1; .@i<4; ++.@i) { if (.@funds[.@i] > .@max) { - set .@max, .@funds[.@i]; - set .@ele, .@i; + .@max = .@funds[.@i]; + .@ele = .@i; deletearray .@rand$[0], getarraysize(.@rand$); } else if (.@funds[.@i] == .@max && .@funds[.@i] >= 2000) { if (!getarraysize(.@rand$)) - set .@rand$[0], .@cas$[.@ele]; - set .@rand$[getarraysize(.@rand$)], .@cas$[.@i]; + .@rand$[0] = .@cas$[.@ele]; + .@rand$[getarraysize(.@rand$)] = .@cas$[.@i]; } } if (.@max < 2000) @@ -287,62 +287,62 @@ OnCalculate: // Tie: declare a random winner. if (!.@force_vote) { - set .@i, rand(getarraysize(.@rand$)); + .@i = rand(getarraysize(.@rand$)); setd "$"+.@rand$[.@i]+"_invest_result",3; - set $2011_agit_invest,4; + $2011_agit_invest = 4; end; } // Tie: initiate a 30-minute election. - set .@str$, implode(.@rand$,"|"); - for(set .@i,0; .@i<4; set .@i,.@i+1) { + .@str$ = implode(.@rand$,"|"); + for(.@i = 0; .@i<4; ++.@i) { if (compare(.@str$,.@cas$[.@i])) - set .@election, .@election | (1<<.@i); + .@election = .@election | (1<<.@i); } switch(.@election) { - case 3: set $2011_agit_invest,11; break; //Prontera|Payon - case 9: set $2011_agit_invest,12; break; //Prontera|Al De Baran - case 5: set $2011_agit_invest,13; break; //Prontera|Geffen - case 10: set $2011_agit_invest,14; break; //Al De Baran|Payon - case 6: set $2011_agit_invest,15; break; //Geffen|Payon - case 12: set $2011_agit_invest,16; break; //Al De Baran|Geffen - case 11: set $2011_agit_invest,17; break; //Prontera|Payon|Al De Baran - case 7: set $2011_agit_invest,18; break; //Prontera|Payon|Geffen - case 13: set $2011_agit_invest,19; break; //Prontera|Al De Baran|Geffen - case 14: set $2011_agit_invest,20; break; //Al De Baran|Payon|Geffen - case 15: set $2011_agit_invest,21; break; //Prontera|Payon|Al De Baran|Geffen + case 3: $2011_agit_invest = 11; break; //Prontera|Payon + case 9: $2011_agit_invest = 12; break; //Prontera|Al De Baran + case 5: $2011_agit_invest = 13; break; //Prontera|Geffen + case 10: $2011_agit_invest = 14; break; //Al De Baran|Payon + case 6: $2011_agit_invest = 15; break; //Geffen|Payon + case 12: $2011_agit_invest = 16; break; //Al De Baran|Geffen + case 11: $2011_agit_invest = 17; break; //Prontera|Payon|Al De Baran + case 7: $2011_agit_invest = 18; break; //Prontera|Payon|Geffen + case 13: $2011_agit_invest = 19; break; //Prontera|Al De Baran|Geffen + case 14: $2011_agit_invest = 20; break; //Al De Baran|Payon|Geffen + case 15: $2011_agit_invest = 21; break; //Prontera|Payon|Al De Baran|Geffen } if ($2011_agit_invest >= 11) donpcevent "Revoting Manager#Invest1::OnStart"; end; } else { setd "$"+.@cas$[.@ele]+"_invest_result",3; - set $2011_agit_invest,4; + $2011_agit_invest = 4; end; } end; OnInvest_start: announce "From now on, we are going to start the investments to connect the 'Abyss Gate' in the WOE areas: Valkyrie Realm, Greenwood Lake, Luina, Britoniah.",bc_all,0xFF0000; //FW_NORMAL 10 - set $fund_prt01,0; - set $fund_prt02,0; - set $fund_prt03,0; - set $fund_prt04,0; - set $fund_prt05,0; - set $fund_pay01,0; - set $fund_pay02,0; - set $fund_pay03,0; - set $fund_pay04,0; - set $fund_pay05,0; - set $fund_gef01,0; - set $fund_gef02,0; - set $fund_gef03,0; - set $fund_gef04,0; - set $fund_gef05,0; - set $fund_alde01,0; - set $fund_alde02,0; - set $fund_alde03,0; - set $fund_alde04,0; - set $fund_alde05,0; + $fund_prt01 = 0; + $fund_prt02 = 0; + $fund_prt03 = 0; + $fund_prt04 = 0; + $fund_prt05 = 0; + $fund_pay01 = 0; + $fund_pay02 = 0; + $fund_pay03 = 0; + $fund_pay04 = 0; + $fund_pay05 = 0; + $fund_gef01 = 0; + $fund_gef02 = 0; + $fund_gef03 = 0; + $fund_gef04 = 0; + $fund_gef05 = 0; + $fund_alde01 = 0; + $fund_alde02 = 0; + $fund_alde03 = 0; + $fund_alde04 = 0; + $fund_alde05 = 0; donpcevent "Investment_total#fund00::OnEnable"; end; OnInvest_stop: @@ -353,35 +353,35 @@ OnInvest_stop: OnResult: announce "We've got the results of the investments for the 'Abyss Gate'. You can check through the Investment Status Board in each WOE area.",bc_all,0xFF0000; //FW_NORMAL 10 if ($2011_agit_invest == 4) { - set $fund_prt01,0; - set $fund_prt02,0; - set $fund_prt03,0; - set $fund_prt04,0; - set $fund_prt05,0; - set $fund_prt_extra,0; - set $fund_pay01,0; - set $fund_pay02,0; - set $fund_pay03,0; - set $fund_pay04,0; - set $fund_pay05,0; - set $fund_pay_extra,0; - set $fund_gef01,0; - set $fund_gef02,0; - set $fund_gef03,0; - set $fund_gef04,0; - set $fund_gef05,0; - set $fund_gef_extra,0; - set $fund_alde01,0; - set $fund_alde02,0; - set $fund_alde03,0; - set $fund_alde04,0; - set $fund_alde05,0; - set $fund_alde_extra,0; + $fund_prt01 = 0; + $fund_prt02 = 0; + $fund_prt03 = 0; + $fund_prt04 = 0; + $fund_prt05 = 0; + $fund_prt_extra = 0; + $fund_pay01 = 0; + $fund_pay02 = 0; + $fund_pay03 = 0; + $fund_pay04 = 0; + $fund_pay05 = 0; + $fund_pay_extra = 0; + $fund_gef01 = 0; + $fund_gef02 = 0; + $fund_gef03 = 0; + $fund_gef04 = 0; + $fund_gef05 = 0; + $fund_gef_extra = 0; + $fund_alde01 = 0; + $fund_alde02 = 0; + $fund_alde03 = 0; + $fund_alde04 = 0; + $fund_alde05 = 0; + $fund_alde_extra = 0; } else if ($2011_agit_invest == 2) donpcevent "#fund_master::OnCalculate"; end; OnReset: - set $2011_agit_invest,0; + $2011_agit_invest = 0; donpcevent "Investment_total#fund00::OnReset"; end; } @@ -412,13 +412,13 @@ OnInit: initnpctimer; donpcevent "Investment_total#fund00::OnVarInit"; } else { - set $agit_result_timer,0; - set $agit_result_notice,0; + $agit_result_timer = 0; + $agit_result_notice = 0; } end; OnVarInit: setarray .@cas$[0],"prt","pay","gef","alde"; - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { setd "$@vfund_"+.@cas$[.@i]+"01", getd("$fund_"+.@cas$[.@i]+"01"); setd "$@vfund_"+.@cas$[.@i]+"02", getd("$fund_"+.@cas$[.@i]+"02"); setd "$@vfund_"+.@cas$[.@i]+"03", getd("$fund_"+.@cas$[.@i]+"03"); @@ -428,13 +428,13 @@ OnVarInit: } end; OnEnable: - set $agit_result_timer,0; - set $agit_result_notice,0; + $agit_result_timer = 0; + $agit_result_notice = 0; initnpctimer; end; OnReset: - set $agit_result_timer,0; - set $agit_result_notice,0; + $agit_result_timer = 0; + $agit_result_notice = 0; stopnpctimer; end; OnTimerReset: @@ -443,11 +443,11 @@ OnTimerReset: OnTimer3600000: if (callfunc("F_Invest_Status") == 1) { if ($agit_result_timer < 59) { - set $agit_result_timer, $agit_result_timer+1; + $agit_result_timer = $agit_result_timer+1; // Trigger on multiples of 5 up to 55, and 58. if ($agit_result_timer % 10 == 5 || $agit_result_timer % 10 == 0 || $agit_result_timer == 58) { - set $agit_result_notice, $agit_result_notice+1; + $agit_result_notice = $agit_result_notice+1; donpcevent "Investment_total#fund00::OnVarInit"; announce "No. "+$agit_result_notice+" Interim statement is now available. You can check through the Investment Status Board in each WOE area.",bc_all,0xFF0000; //FW_NORMAL 10 } @@ -468,7 +468,7 @@ prt_gld,164,98,3 script Revoting Manager#Invest1 4_M_BOSSCAT,{ mes "Please wait for our results announcement."; close; OnInit: - set .@invest_status, callfunc("F_Invest_Status"); + .@invest_status = callfunc("F_Invest_Status"); if (.@invest_status == 2 && $2011_agit_invest >= 11 && $agit_revoting_timer < 30) { donpcevent "Revoting Manager#Invest2::OnEnable"; initnpctimer; @@ -491,26 +491,26 @@ OnCalculate: case 21: setarray.@cas$[0],"prt","pay","alde","gef"; break; default: end; } - set .@max, getd("$fund_"+.@cas$[0]+"_extra"); - for(set .@i,1; .@i<getarraysize(.@cas$); set .@i,.@i+1) { - set .@funds, getd("$fund_"+.@cas$[.@i]+"_extra"); + .@max = getd("$fund_"+.@cas$[0]+"_extra"); + for(.@i = 1; .@i<getarraysize(.@cas$); ++.@i) { + .@funds = getd("$fund_"+.@cas$[.@i]+"_extra"); if (.@funds > .@max) { - set .@max, .@funds; - set .@ele, .@i; + .@max = .@funds; + .@ele = .@i; deletearray .@rand$[0], getarraysize(.@rand$); } else if (.@funds == .@max) { if (!getarraysize(.@rand$)) - set .@rand$[0], .@cas$[.@ele]; - set .@rand$[getarraysize(.@rand$)], .@cas$[.@i]; + .@rand$[0] = .@cas$[.@ele]; + .@rand$[getarraysize(.@rand$)] = .@cas$[.@i]; } } if (getarraysize(.@rand$)) { - set .@i, rand(getarraysize(.@rand$)); + .@i = rand(getarraysize(.@rand$)); setd "$"+.@rand$[.@i]+"_invest_result",3; } else setd "$"+.@cas$[.@ele]+"_invest_result",3; - set $2011_agit_invest,4; - set $agit_revoting_timer,0; + $2011_agit_invest = 4; + $agit_revoting_timer = 0; end; OnEnable: enablenpc "Revoting Manager#Invest1"; @@ -530,15 +530,15 @@ OnTimerReset: initnpctimer; end; OnTimer60000: - set .@revote, $agit_revoting_timer; + .@revote = $agit_revoting_timer; if (.@revote < 30) { - set $agit_revoting_timer, $agit_revoting_timer+1; + $agit_revoting_timer = $agit_revoting_timer+1; donpcevent "Revoting Manager#Invest1::OnTimerReset"; } else if (.@revote == 30) { announce "Cat Paw Merchant Guild: Now we are going to close the additional vote. We will announce the results soon.",bc_all,0xFF0000; //FW_NORMAL 10 donpcevent "Revoting Manager#Invest2::OnDisable"; donpcevent "Revoting Manager#Invest1::OnEnable"; - set $agit_revoting_timer, $agit_revoting_timer+1; + $agit_revoting_timer = $agit_revoting_timer+1; donpcevent "Revoting Manager#Invest1::OnTimerReset"; } else if (.@revote == 31) { donpcevent "Revoting Manager#Invest1::OnCalculate"; @@ -553,7 +553,7 @@ OnTimer60000: } prt_gld,164,98,3 script Revoting Manager#Invest2 4_M_BOSSCAT,{ - set .@invest, $2011_agit_invest; + .@invest = $2011_agit_invest; if (.@invest < 11) { mes "[Revoting Manager]"; mes "No! This is not the time to take a revote."; @@ -584,17 +584,17 @@ prt_gld,164,98,3 script Revoting Manager#Invest2 4_M_BOSSCAT,{ // Create menu. explode(.@candidates$, callsub(OnGetCandidates, .@invest),"|"); - for(set .@i,0; .@i<getarraysize(.@candidates$); set .@i,.@i+1) { + for(.@i = 0; .@i<getarraysize(.@candidates$); ++.@i) { if (.@candidates$[.@i] == "alde") - set .@menu$[.@i],"Luina"; + .@menu$[.@i] = "Luina"; else if (.@candidates$[.@i] == "gef") - set .@menu$[.@i],"Britoniah"; + .@menu$[.@i] = "Britoniah"; else if (.@candidates$[.@i] == "pay") - set .@menu$[.@i],"Greenwood Lake"; + .@menu$[.@i] = "Greenwood Lake"; else if (.@candidates$[.@i] == "prt") - set .@menu$[.@i],"Valkyrie Realm"; + .@menu$[.@i] = "Valkyrie Realm"; } - set .@vote, select(implode(.@menu$,":"))-1; + .@vote = select(implode(.@menu$,":"))-1; mes "[Revoting Manager]"; mes "You've voted for "+.@menu$[.@vote]+"."; @@ -644,22 +644,22 @@ OnTimer14000: end; OnTimer20000: explode(.@candidates$, callsub(OnGetCandidates, $2011_agit_invest),"|"); - for(set .@i,0; .@i<getarraysize(.@candidates$); set .@i,.@i+1) { + for(.@i = 0; .@i<getarraysize(.@candidates$); ++.@i) { if (.@candidates$[.@i] == "alde") - set .@choices$[.@i],"Luina"; + .@choices$[.@i] = "Luina"; else if (.@candidates$[.@i] == "gef") - set .@choices$[.@i],"Britoniah"; + .@choices$[.@i] = "Britoniah"; else if (.@candidates$[.@i] == "pay") - set .@choices$[.@i],"Greenwood Lake"; + .@choices$[.@i] = "Greenwood Lake"; else if (.@candidates$[.@i] == "prt") - set .@choices$[.@i],"Valkyrie Realm"; + .@choices$[.@i] = "Valkyrie Realm"; } announce "Cat Paw Merchant Guild: The candidates for the additional vote are... "+implode(.@choices$," vs. ")+".",bc_all,0xFF0000; //FW_NORMAL 10 - set $fund_prt_extra,0; - set $fund_pay_extra,0; - set $fund_gef_extra,0; - set $fund_alde_extra,0; - set $agit_revoting_timer,0; + $fund_prt_extra = 0; + $fund_pay_extra = 0; + $fund_gef_extra = 0; + $fund_alde_extra = 0; + $agit_revoting_timer = 0; donpcevent "Revoting Manager#Invest2::OnEnable"; stopnpctimer; end; @@ -672,15 +672,15 @@ prtg_cas01,2,2,0 script Abrai 1_M_JOBTESTER,{ OnAgitInvest: switch(callfunc("F_Invest_Status")) { case 0: - set $2011_agit_invest,0; + $2011_agit_invest = 0; donpcevent "#fund_master::OnReset"; break; case 1: - set $2011_agit_invest,1; + $2011_agit_invest = 1; donpcevent "#fund_master::OnInvest_start"; break; case 2: - set $2011_agit_invest,2; + $2011_agit_invest = 2; donpcevent "#fund_master::OnInvest_stop"; break; case 3: @@ -696,27 +696,27 @@ OnAgitInvest: - script Cat Paw Merchant Guild -1,{ if (compare(strnpcinfo(4),"alde")) { - set .@npc$,"alde"; - set .@name$,"Megrez"; - set .@realm$,"Luina"; - set .@intro$,"Luina Branch Manager in Al De Baran"; + .@npc$ = "alde"; + .@name$ = "Megrez"; + .@realm$ = "Luina"; + .@intro$ = "Luina Branch Manager in Al De Baran"; } else if (compare(strnpcinfo(4),"gef")) { - set .@npc$,"gef"; - set .@name$,"Meraq"; - set .@realm$,"Britoniah"; - set .@intro$,"Britoniah Branch Manager"; + .@npc$ = "gef"; + .@name$ = "Meraq"; + .@realm$ = "Britoniah"; + .@intro$ = "Britoniah Branch Manager"; } else if (compare(strnpcinfo(4),"pay")) { - set .@npc$,"pay"; - set .@name$,"Phecda"; - set .@realm$,"Greenwood Lake"; - set .@intro$,"Payon Greenwood Lake Branch Manager"; + .@npc$ = "pay"; + .@name$ = "Phecda"; + .@realm$ = "Greenwood Lake"; + .@intro$ = "Payon Greenwood Lake Branch Manager"; } else if (compare(strnpcinfo(4),"prt")) { - set .@npc$,"prt"; - set .@name$,"Dubae"; - set .@realm$,"Valkyrie Realm"; - set .@intro$,"Prontera Valkyrie Realm Branch Manager"; + .@npc$ = "prt"; + .@name$ = "Dubae"; + .@realm$ = "Valkyrie Realm"; + .@intro$ = "Prontera Valkyrie Realm Branch Manager"; } - set .@n$,"["+.@name$+"]"; + .@n$ = "["+.@name$+"]"; mes .@n$; mes "I'm "+.@name$+", the "+.@intro$+" of the Cat Paw Merchant Guild."; @@ -890,23 +890,23 @@ OnAgitInvest: mes "Please come back during the investment duration."; close; } - set .@guild, getcharid(2); - for(set .@i,1; .@i<=5; set .@i,.@i+1) { - set .@castle_name$[.@i], getcastlename(.@npc$+"g_cas0"+.@i); - set .@owner_id[.@i], getcastledata(.@npc$+"g_cas0"+.@i,1); - set .@owner_name$[.@i], getguildname(.@owner_id[.@i]); + .@guild = getcharid(2); + for(.@i = 1; .@i<=5; ++.@i) { + .@castle_name$[.@i] = getcastlename(.@npc$+"g_cas0"+.@i); + .@owner_id[.@i] = getcastledata(.@npc$+"g_cas0"+.@i,1); + .@owner_name$[.@i] = getguildname(.@owner_id[.@i]); if (.@guild == .@owner_id[.@i]) { - set .@menu$, .@menu$+.@castle_name$[.@i]+" ["+.@owner_name$[.@i]+"] Guild:"; - set .@castles_owned, .@castles_owned | (1<<.@i); + .@menu$ = .@menu$+.@castle_name$[.@i]+" ["+.@owner_name$[.@i]+"] Guild:"; + .@castles_owned = .@castles_owned | (1<<.@i); } else - set .@menu$, .@menu$+"^aaaaaaNot the guild that claimed "+.@castle_name$[.@i]+"^000000:"; + .@menu$ = .@menu$+"^aaaaaaNot the guild that claimed "+.@castle_name$[.@i]+"^000000:"; } mes .@n$; mes "Would you like to invest in the ^4d4dff"+.@realm$+"^000000 region?"; mes "If there is a castle occupied already, you will invest in the castle and the guild that is occupying it."; next; if (.@castles_owned) { - set .@i, select(.@menu$+"Cancel"); + .@i = select(.@menu$+"Cancel"); if (.@i == 6) { mes .@n$; mes "Canceled."; @@ -938,34 +938,34 @@ OnAgitInvest: - script Gate Manager#realm -1,{ if (compare(strnpcinfo(4),"alde")) { - set .@npc$,"alde"; - set .@name$,"Alkor"; - set .@gate$,"Hero's Tears"; - set .@realm$,"Luina"; + .@npc$ = "alde"; + .@name$ = "Alkor"; + .@gate$ = "Hero's Tears"; + .@realm$ = "Luina"; } else if (compare(strnpcinfo(4),"gef")) { - set .@npc$,"gef"; - set .@name$,"Mizar"; - set .@gate$,"Hill of the Dead"; - set .@realm$,"Britoniah"; + .@npc$ = "gef"; + .@name$ = "Mizar"; + .@gate$ = "Hill of the Dead"; + .@realm$ = "Britoniah"; } else if (compare(strnpcinfo(4),"pay")) { - set .@npc$,"pay"; - set .@name$,"Alkaid"; - set .@gate$,"Winds of the Ancient"; - set .@realm$,"Greenwood Lake"; + .@npc$ = "pay"; + .@name$ = "Alkaid"; + .@gate$ = "Winds of the Ancient"; + .@realm$ = "Greenwood Lake"; } else if (compare(strnpcinfo(4),"prt")) { - set .@npc$,"prt"; - set .@name$,"Arios"; - set .@gate$,"Way of the Warrior"; - set .@realm$,"Valkyrie Realm"; + .@npc$ = "prt"; + .@name$ = "Arios"; + .@gate$ = "Way of the Warrior"; + .@realm$ = "Valkyrie Realm"; } - set .@n$,"["+.@name$+"]"; + .@n$ = "["+.@name$+"]"; if (callfunc("F_Invest_Status") != 3) { mes .@n$; mes "There are currently no connected dungeon gates."; close; } - set .@status, getd("$"+.@npc$+"_invest_result"); + .@status = getd("$"+.@npc$+"_invest_result"); if (.@status == 3) { mes .@n$; mes "We've successfully connected the Abyss Gate ["+.@gate$+"] with the help from your investment."; @@ -975,7 +975,7 @@ OnAgitInvest: mes "Please visit as often as possible since the entrance fee is saved as an investment for the region."; mes "Do you want to enter the Agit dungeon?"; next; - set .@i, select(.@realm$+" Dungeon 1F - 10000z:"+.@realm$+" Dungeon 2F - 10000z:Cancel"); + .@i = select(.@realm$+" Dungeon 1F - 10000z:"+.@realm$+" Dungeon 2F - 10000z:Cancel"); if (.@i == 3) { mes .@n$; mes "Canceled."; @@ -1017,40 +1017,40 @@ OnAgitInvest: } - script Investment Status Board -1,{ - set .@invest_status, callfunc("F_Invest_Status"); + .@invest_status = callfunc("F_Invest_Status"); if (.@invest_status == 1) { if (compare(strnpcinfo(4),"alde")) { - set .@npc$,"alde"; - set .@realm$,"Luina"; + .@npc$ = "alde"; + .@realm$ = "Luina"; } else if (compare(strnpcinfo(4),"gef")) { - set .@npc$,"gef"; - set .@realm$,"Britoniah"; + .@npc$ = "gef"; + .@realm$ = "Britoniah"; } else if (compare(strnpcinfo(4),"pay")) { - set .@npc$,"pay"; - set .@realm$,"Greenwood Lake"; + .@npc$ = "pay"; + .@realm$ = "Greenwood Lake"; } else if (compare(strnpcinfo(4),"prt")) { - set .@npc$,"prt"; - set .@realm$,"Valkyrie Realm"; + .@npc$ = "prt"; + .@realm$ = "Valkyrie Realm"; } - set .@notice, $agit_result_notice; + .@notice = $agit_result_notice; if (.@notice < 1 || .@notice > 12) { mes "There are currently no investment sums available."; close; } else if (.@notice == 1) - set .@str$,"1st"; + .@str$ = "1st"; else if (.@notice == 2) - set .@str$,"2nd"; + .@str$ = "2nd"; else if (.@notice == 3) - set .@str$,"3rd"; + .@str$ = "3rd"; else - set .@str$,.@notice+"th"; + .@str$ = .@notice+"th"; mes .@str$+" total (unit in 10,000z)"; - for(set .@i,1; .@i<=5; set .@i,.@i+1) { - set .@map$, .@npc$+"g_cas0"+.@i; - set .@fund[.@i], getd("$@vfund_"+.@npc$+"0"+.@i); + for(.@i = 1; .@i<=5; ++.@i) { + .@map$ = .@npc$+"g_cas0"+.@i; + .@fund[.@i] = getd("$@vfund_"+.@npc$+"0"+.@i); mes getcastlename(.@map$)+" "+getguildname(getcastledata(.@map$,1))+" Guild: "+.@fund[.@i]; } - set .@fund[0], getd("$@vfund_"+.@npc$+"_extra"); + .@fund[0] = getd("$@vfund_"+.@npc$+"_extra"); mes .@realm$+" normal: "+.@fund[0]; mes .@realm$+" Investment Grand Total: "+(.@fund[0]+.@fund[1]+.@fund[2]+.@fund[3]+.@fund[4]+.@fund[5]); close; @@ -1063,7 +1063,7 @@ OnAgitInvest: setarray .@invest_result[0], $prt_invest_result,$pay_invest_result,$gef_invest_result,$alde_invest_result; setarray .@invest_region$[0], "Valkyrie Realm", "Greenwood Lake", "Britoniah", "Luina"; mes "!- Investment Results of All Agit Regions -!"; - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { if (.@invest_result[.@i] == 1) mes "^aaaaaa["+.@invest_region$[.@i]+"] below minimum^000000"; else if (.@invest_result[.@i] == 2) { @@ -1087,22 +1087,22 @@ OnAgitInvest: //============================================================ - script Gate Manager#castle -1,{ - set .@id, atoi(charat(strnpcinfo(2),getstrlen(strnpcinfo(2))-1)); + .@id = atoi(charat(strnpcinfo(2),getstrlen(strnpcinfo(2))-1)); if (compare(strnpcinfo(2),"alde")) { - set .@npc$,"alde"; - set .@realm$,"Luina"; + .@npc$ = "alde"; + .@realm$ = "Luina"; } else if (compare(strnpcinfo(2),"gef")) { - set .@npc$,"gef"; - set .@realm$,"Britoniah"; + .@npc$ = "gef"; + .@realm$ = "Britoniah"; } else if (compare(strnpcinfo(2),"pay")) { - set .@npc$,"pay"; - set .@realm$,"Greenwood Lake"; + .@npc$ = "pay"; + .@realm$ = "Greenwood Lake"; } else if (compare(strnpcinfo(2),"prt")) { - set .@npc$,"prt"; - set .@realm$,"Valkyrie Realm"; + .@npc$ = "prt"; + .@realm$ = "Valkyrie Realm"; } - set .@GID, getcastledata(strnpcinfo(4),1); + .@GID = getcastledata(strnpcinfo(4),1); if (getcharid(2) != .@GID) { mes "[Gate Manager]"; mes "You don't seem to be the member of guild owning this castle."; @@ -1231,9 +1231,9 @@ OnAgitInvest: end; L_Enter: - set .@invest_status, callfunc("F_Invest_Status"); + .@invest_status = callfunc("F_Invest_Status"); if (.@invest_status == 3) { - set .@status, getd("$"+getarg(2)+"_invest_result"); + .@status = getd("$"+getarg(2)+"_invest_result"); if ((getarg(0) == 1 && .@status == 2) || .@status == 3) return; else { @@ -1288,32 +1288,32 @@ malangdo,218,126,4 script Cat Paw Merchants Notice 4_BOARD3,{ "Planting trees on Mellow Island","Ancient language research","Weapons made of sharp teeth","Toy boss doll 01", "A tiger is just a cat after all","The shattered spear and shield?","Toy boss doll 02","Best in summer! Cold scales", "Piece of Thanatos' armor","I hear Dragon Scales are tough 02","The identity of the creepy eye","If only I could see!"; - set .@menu$, "Quit:"+implode(.@event1$[0],":"); + .@menu$ = "Quit:"+implode(.@event1$[0],":"); while(1) { - set .@i, select(.@menu$)-1; + .@i = select(.@menu$)-1; switch(.@i) { case 0: close; - case 1: set .@str$,"2 Pieces of Queen's Wing"; break; - case 2: set .@str$,"2 Broken Crowns"; break; - case 3: set .@str$,"2 Fire Dragon Scales"; break; - case 4: set .@str$,"3 Mother's Nightmares"; break; - case 5: set .@str$,"5 Gemstones"; break; - case 6: set .@str$,"5 Heroic Emblems"; break; - case 7: set .@str$,"3 Taeguk Plates"; break; - case 8: set .@str$,"3 Broken Pharaoh Symbols and 3 Tutankhamen's Masks"; break; - case 9: set .@str$,"2 Pocket Watches"; break; - case 10: set .@str$,"3 Young Twigs"; break; - case 11: set .@str$,"5 Rossata Pieces"; break; - case 12: set .@str$,"5 Fangs of Garm"; break; - case 13: set .@str$,"3 Baphomet Dolls"; break; - case 14: set .@str$,"1 Tiger's Footskin and 5 Tiger Skins"; break; - case 15: set .@str$,"3 Broken Shield Pieces and 3 Shining Spear Blades"; break; - case 16: set .@str$,"3 Osiris Dolls"; break; - case 17: set .@str$,"1 Ice Scale"; break; - case 18: set .@str$,"1 Skeletal Armor Piece"; break; - case 19: set .@str$,"1 Darkred Scale Piece"; break; - case 20: set .@str$,"2 Wills of Red Darkness"; break; - case 21: set .@str$,"2 Foolishness of the Blind"; break; + case 1: .@str$ = "2 Pieces of Queen's Wing"; break; + case 2: .@str$ = "2 Broken Crowns"; break; + case 3: .@str$ = "2 Fire Dragon Scales"; break; + case 4: .@str$ = "3 Mother's Nightmares"; break; + case 5: .@str$ = "5 Gemstones"; break; + case 6: .@str$ = "5 Heroic Emblems"; break; + case 7: .@str$ = "3 Taeguk Plates"; break; + case 8: .@str$ = "3 Broken Pharaoh Symbols and 3 Tutankhamen's Masks"; break; + case 9: .@str$ = "2 Pocket Watches"; break; + case 10: .@str$ = "3 Young Twigs"; break; + case 11: .@str$ = "5 Rossata Pieces"; break; + case 12: .@str$ = "5 Fangs of Garm"; break; + case 13: .@str$ = "3 Baphomet Dolls"; break; + case 14: .@str$ = "1 Tiger's Footskin and 5 Tiger Skins"; break; + case 15: .@str$ = "3 Broken Shield Pieces and 3 Shining Spear Blades"; break; + case 16: .@str$ = "3 Osiris Dolls"; break; + case 17: .@str$ = "1 Ice Scale"; break; + case 18: .@str$ = "1 Skeletal Armor Piece"; break; + case 19: .@str$ = "1 Darkred Scale Piece"; break; + case 20: .@str$ = "2 Wills of Red Darkness"; break; + case 21: .@str$ = "2 Foolishness of the Blind"; break; } mes "["+.@event1$[.@i-1]+"]"; mes .@str$+" for one Cat Paw Merchants Investment Certificate."; @@ -1389,7 +1389,7 @@ malangdo,218,123,1 script Namis#invest 4_CAT_SAILOR2,4,4,{ "Planting trees on Mellow Island","Ancient language research","Weapons made of sharp teeth","Toy boss doll 01", "A tiger is just a cat after all","The shattered spear and shield?","Toy boss doll 02","Best in summer! Cold scales", "Piece of Thanatos' armor","I hear Dragon Scales are tough 02","The identity of the creepy eye","If only I could see!"; - set .@i, select(implode(.@event1$[0],":"))-1; + .@i = select(implode(.@event1$[0],":"))-1; switch(.@i+1) { case 1: callsub L_Check,"2 Pieces of Queen's Wing",6326,2,"Wings of the Insect Queen? What a pitiful name. I would've given some cool names!",.@event1$[.@i]; case 2: callsub L_Check,"2 Broken Crowns",7754,2,"For crying out loud! Those cats working on these events must be playing around. Can't they think of a better name?",.@event1$[.@i]; @@ -1421,12 +1421,12 @@ malangdo,218,123,1 script Namis#invest 4_CAT_SAILOR2,4,4,{ } end; L_Check: - set .@args, getargcount(); + .@args = getargcount(); if (.@args > 5) { if (countitem(getarg(5)) < getarg(6)) - set .@items,1; //incomplete + .@items = 1; //incomplete else - set .@items,2; //complete + .@items = 2; //complete } if (countitem(getarg(1)) < getarg(2) || .@items == 1) { mes "[Namis]"; @@ -1512,7 +1512,7 @@ malangdo,215,119,4 script Thanks Ticket Machine 2_VENDING_MACHINE1,{ close; } delitem 6488,5; //Thanks_Invest_Ticket - set .@i, rand(1,10000); + .@i = rand(1,10000); if (.@i <= 100) callsub L_Bag,12531,1; //White_Potion_Box else if (.@i <= 200) callsub L_Bag,12549,1; //White_Slim_Pot_Box2 else if (.@i <= 250) callsub L_Bag,11549,10; //Woe_Blue_Potion @@ -1581,7 +1581,7 @@ malangdo,215,119,4 script Thanks Ticket Machine 2_VENDING_MACHINE1,{ close; } delitem 6488,50; //Thanks_Invest_Ticket - set .@i, rand(1,10000); + .@i = rand(1,10000); if (.@i <= 100) callsub L_Bag,12531,1; //White_Potion_Box else if (.@i <= 200) callsub L_Bag,12549,1; //White_Slim_Pot_Box2 else if (.@i <= 250) callsub L_Bag,11549,20; //Woe_Blue_Potion diff --git a/npc/re/instances/BakonawaLake.txt b/npc/re/instances/BakonawaLake.txt index 584044b13..9cf9ea8cd 100644 --- a/npc/re/instances/BakonawaLake.txt +++ b/npc/re/instances/BakonawaLake.txt @@ -36,8 +36,8 @@ ma_scene01,174,179,4 script Taho 4_M_DEWZATIMAN,{ close; } - set .@party_id,getcharid(1); - set .@md_name$, "Bakonawa Lake"; + .@party_id = getcharid(1); + .@md_name$ = "Bakonawa Lake"; .@baku_time = questprogress(12278,PLAYTIME); if (!.@baku_time) { @@ -53,16 +53,16 @@ ma_scene01,174,179,4 script Taho 4_M_DEWZATIMAN,{ mes "[Taho]"; mes "Are you the leader of the Bakonawa slayers? The road is not well so we have to go down the cliff with a rope, is that OK?"; next; - set .@i, select("Please weave a rope.:Now I will go down.:Cancel."); + .@i = select("Please weave a rope.:Now I will go down.:Cancel."); } else { mes "[Taho]"; mes "You came for slaying Bakonawa. The leader of your party has to help me weaving the rope for going down."; next; - set .@i, select(":Now I will go down.:Cancel."); + .@i = select(":Now I will go down.:Cancel."); } switch(.@i) { case 1: - set .@instance,instance_create(.@md_name$,.@party_id); + .@instance = instance_create(.@md_name$,.@party_id); if (.@instance < 0) { mes "[Taho]"; mes "Oh, the rope got dropped. I have to make a new one."; @@ -111,8 +111,8 @@ sec_in02,26,26,4 script Bakonawa's Rage 4_M_DEWZATIMAN,{ if (callfunc("F_GM_NPC",1854,0) == 1) { erasequest 12278; erasequest 12279; - set malaya_bakona1,7; - set malaya_bakona2,15; + malaya_bakona1 = 7; + malaya_bakona2 = 15; } close; } @@ -157,7 +157,7 @@ OnInstanceInit: end; OnStart: enablenpc instance_npcname("#Bakonawan1"); - set .@map$, instance_mapname("1@ma_b"); + .@map$ = instance_mapname("1@ma_b"); mapannounce .@map$,"Taho: I can see him there on the surface! ATTACK!!!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0 monster .@map$,78,81,"Bakonawa",2320,1,instance_npcname("#Bakonawan1")+"::OnMyMobDead"; //original: (78,83) initnpctimer; @@ -166,7 +166,7 @@ OnFail: killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan1")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@ma_b"); + .@map$ = instance_mapname("1@ma_b"); if (mobcount(.@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead") < 1) { donpcevent instance_npcname("#BakonawaDeadn1")+"::OnStart"; killmonster .@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead"; @@ -189,7 +189,7 @@ OnTimer570000: donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart"; end; OnTimer600000: - set .@map$, instance_mapname("1@ma_b"); + .@map$ = instance_mapname("1@ma_b"); mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0 donpcevent instance_npcname("Taho#Fail")+"::OnStart"; donpcevent instance_npcname("#Bakonawan1")+"::OnFail"; @@ -220,9 +220,9 @@ OnTouch: OnTimer5000: setarray .@x[0],79,71,60,61,57,89,95,96,99; setarray .@y[0],71,72,80,90,99,73,82,90,99; - set .@map$, instance_mapname("1@ma_b"); - for(set .@i,0; .@i<9; set .@i,.@i+1) { - set .@rand, rand(1,10); + .@map$ = instance_mapname("1@ma_b"); + for(.@i = 0; .@i<9; ++.@i) { + .@rand = rand(1,10); if (.@rand > 7) monster .@map$,.@x[.@i],.@y[.@i],"Bakonawa's Will",2337,1,instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead"; else if (.@rand < 4) @@ -271,8 +271,8 @@ OnInstanceInit: end; OnStart: enablenpc instance_npcname("#Bakonawan2"); - set .@label$, instance_npcname("#Bakonawan2")+"::OnMyMobDead"; - set .@map$, instance_mapname("1@ma_b"); + .@label$ = instance_npcname("#Bakonawan2")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_b"); monster .@map$,95,98,"Caldron",2328,1,.@label$; monster .@map$,60,98,"Caldron",2328,1,.@label$; monster .@map$,97,104,"Gong",2328,1,.@label$; @@ -281,8 +281,8 @@ OnStart: initnpctimer; end; OnMyMobDead: - set .@map$, instance_mapname("1@ma_b"); - set .@mob_dead_num, mobcount(.@map$,instance_npcname("#Bakonawan2")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@ma_b"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#Bakonawan2")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { donpcevent instance_npcname("#Bakonawan2-1")+"::OnEnd"; stopnpctimer; @@ -304,7 +304,7 @@ OnTimer297000: callsub OnAnnounce,"3 seconds",18,0; OnTimer298000: callsub OnAnnounce,"2 seconds",19,0; OnTimer299000: callsub OnAnnounce,"1 second",20,0; OnTimer300000: - set .@map$, instance_mapname("1@ma_b"); + .@map$ = instance_mapname("1@ma_b"); mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0 donpcevent instance_npcname("Taho#Fail")+"::OnStart"; donpcevent instance_npcname("#Bakonawan2-1")+"::OnFail"; @@ -363,8 +363,8 @@ OnStart: donpcevent instance_npcname("#Bakonawan3-1")+"::OnStart"; end; OnMyMobDead: - set .@map$, instance_mapname("1@ma_b"); - set .@mob_dead_num, mobcount(.@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@ma_b"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { mapannounce .@map$,"Taho: We got him! I can see he has threw up something that looks like a box.",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0 donpcevent instance_npcname("Taho#Completed")+"::OnStart"; @@ -397,7 +397,7 @@ OnTimer597000: callsub OnAnnounce,"3 seconds",18,0; OnTimer598000: callsub OnAnnounce,"2 seconds",19,0; OnTimer599000: callsub OnAnnounce,"1 second",20,0; OnTimer600000: - set .@map$, instance_mapname("1@ma_b"); + .@map$ = instance_mapname("1@ma_b"); mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0 donpcevent instance_npcname("Taho#Fail")+"::OnStart"; killmonster .@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead"; @@ -440,17 +440,17 @@ OnTimer600000: stopnpctimer; end; OnMobSpawn: - set .@label$, instance_npcname("#Bakonawan3-1")+"::OnMyMobDead"; - set .@map$, instance_mapname("1@ma_b"); + .@label$ = instance_npcname("#Bakonawan3-1")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_b"); killmonster .@map$,.@label$; - set .@mob_dead_num, mobcount(.@map$,.@label$); + .@mob_dead_num = mobcount(.@map$,.@label$); if (.@mob_dead_num < 50) { - set .@mob_rg, 50 - .@mob_dead_num; + .@mob_rg = 50 - .@mob_dead_num; if (.@mob_rg > getarg(0)) - set .@mob_rg, getarg(0); + .@mob_rg = getarg(0); while(1) { areamonster .@map$,74,74,82,74,"Bakonawa's Puppet",2334,1,.@label$; - set .@mob_dead_num, mobcount(.@map$,.@label$); + .@mob_dead_num = mobcount(.@map$,.@label$); if (.@mob_dead_num >= .@mob_rg) { break; } diff --git a/npc/re/instances/BangungotHospital.txt b/npc/re/instances/BangungotHospital.txt index d4ac3f9b0..911abfced 100644 --- a/npc/re/instances/BangungotHospital.txt +++ b/npc/re/instances/BangungotHospital.txt @@ -21,7 +21,7 @@ ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{ if (BaseLevel < 100) end; - set .@party_id,getcharid(1); + .@party_id = getcharid(1); cutin "malaya_nurseB",2; if (!questprogress(9223)) { .@quest = questprogress(9222); @@ -215,7 +215,7 @@ L_Closed: mes "I call her behind, but"; mes "she doesn't respond. -"; if (getarg(0)) { - set malaya_bang,31; + malaya_bang = 31; changequest 11302,11303; } close2; @@ -232,7 +232,7 @@ L_NoParty: end; L_Enter: - set .@md_name$,"Bangungot Hospital 2F"; + .@md_name$ = "Bangungot Hospital 2F"; if (getarg(2) == 0) { mes "[Nurse Maenne]"; mes "I already heard that story so"; @@ -257,7 +257,7 @@ L_Enter: next; switch(select(((getarg(0))?"Prepare to enter the second floor.":"")+":Enter the second floor.:Do not enter.")) { case 1: - set .@instance, instance_create(.@md_name$,getcharid(1)); + .@instance = instance_create(.@md_name$,getcharid(1)); if (.@instance < 0) { mes "[Nurse Maenne]"; mes "A critical situation has happened."; @@ -351,8 +351,8 @@ sec_in02,27,30,0 script Bangungot Gate 2_MONEMUS,{ case 4: erasequest 9223; close; case 5: setquest 9224; close; case 6: erasequest 9224; close; - case 7: set malaya_bang,30; close; - case 8: set malaya_bang,40; close; + case 7: malaya_bang = 30; close; + case 8: malaya_bang = 40; close; case 9: setquest 11309; close; case 10: completequest 11309; close; case 11: close; @@ -364,7 +364,7 @@ sec_in02,27,30,0 script Bangungot Gate 2_MONEMUS,{ 1@ma_h,43,157,0 script #Memorial Start HIDDEN_WARP_NPC,2,2,{ end; OnTouch: - set .@map$, instance_mapname("1@ma_h"); + .@map$ = instance_mapname("1@ma_h"); mapannounce .@map$,"Bangungot: You silly "+strcharinfo(0)+" ....",bc_map,"0xFF82FF"; mapannounce .@map$,"Bangungot: Get out before you die...",bc_map,"0xFF82FF"; areamonster .@map$,44,156,46,158,"Bangungot's Mangkukulam",2339,1,instance_npcname("#Memorial Start")+"::OnMyMobDead"; @@ -374,7 +374,7 @@ OnMyMobDead: initnpctimer; end; OnTimer1000: - set .@map$, instance_mapname("1@ma_h"); + .@map$ = instance_mapname("1@ma_h"); if (mobcount(.@map$,instance_npcname("#Memorial Start")+"::OnMyMobDead") < 1) { donpcevent instance_npcname("#Ward1 Entry")+"::OnEnable1"; donpcevent instance_npcname("#Memorial Start_time")+"::OnDisable"; @@ -412,8 +412,8 @@ OnInstanceInit: disablenpc instance_npcname(strnpcinfo(0)); end; OnEnable1: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; enablenpc instance_npcname(strnpcinfo(0)); specialeffect EF_BAT2; switch(atoi(charat(strnpcinfo(2),4))) { @@ -449,7 +449,7 @@ OnEnable2: end; */ OnEnable3: - set .@i, atoi(charat(strnpcinfo(2),4))+1; + .@i = atoi(charat(strnpcinfo(2),4))+1; donpcevent instance_npcname("#Ward"+.@i+" Entry")+"::OnEnable1"; disablenpc instance_npcname(strnpcinfo(0)); end; @@ -457,16 +457,16 @@ OnMyMobDead: initnpctimer; end; OnTimer1000: - set .@map$, instance_mapname("1@ma_h"); + .@map$ = instance_mapname("1@ma_h"); if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) { specialeffect EF_BAT2; donpcevent instance_npcname(strnpcinfo(0))+"::OnEnable3"; switch(atoi(charat(strnpcinfo(2),4))) { - case 1: set .@str$,"Bangungot: I will let you see the pain and the agony actually be real....."; break; - case 2: set .@str$,"Bangungot: Diseased spirits are the source of my energy, and my life..."; break; - case 3: set .@str$,"Bangungot: Scream more....and more...... your pain..."; break; - case 4: set .@str$,"Bangungot: Deeply and more deeply in pain..."; break; - case 5: set .@str$,"Bangungot: Be horrified...be petrified."; break; + case 1: .@str$ = "Bangungot: I will let you see the pain and the agony actually be real....."; break; + case 2: .@str$ = "Bangungot: Diseased spirits are the source of my energy, and my life..."; break; + case 3: .@str$ = "Bangungot: Scream more....and more...... your pain..."; break; + case 4: .@str$ = "Bangungot: Deeply and more deeply in pain..."; break; + case 5: .@str$ = "Bangungot: Be horrified...be petrified."; break; } mapannounce .@map$,.@str$,bc_map,"0xFF82FF"; } @@ -484,8 +484,8 @@ OnInstanceInit: disablenpc instance_npcname("#Ward6 Entry"); end; OnEnable1: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Ward6 Entry")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Ward6 Entry")+"::OnMyMobDead"; enablenpc instance_npcname("#Ward6 Entry"); specialeffect EF_BAT2; areamonster .@map$,93,137,95,139,"Bangungot's Mangkukulam",2339,1,.@label$; @@ -504,7 +504,7 @@ OnMyMobDead: initnpctimer; end; OnTimer3000: - set .@map$, instance_mapname("1@ma_h"); + .@map$ = instance_mapname("1@ma_h"); if (mobcount(.@map$,instance_npcname("#Ward6 Entry")+"::OnMyMobDead") < 1) { specialeffect EF_BAT2; donpcevent instance_npcname("#Summon Boss")+"::OnEnable"; @@ -563,7 +563,7 @@ OnMyMobDead: initnpctimer; end; OnTimer1000: - set .@map$, instance_mapname("1@ma_h"); + .@map$ = instance_mapname("1@ma_h"); if (mobcount(.@map$,instance_npcname("#Boss Room Entry")+"::OnMyMobDead") < 1) mapannounce .@map$,"Bangungot: HAHAHAH... That's not enough, I will be even stronger....",bc_map,"0xFF82FF"; stopnpctimer; @@ -605,12 +605,12 @@ OnEnable: end; OnTimer25000: mapannounce instance_mapname("1@ma_h"),"Bangungot: You will know what it is...",bc_map,"0xFF82FF"; - for(set .@i,10; .@i<=22; set .@i,.@i+1) + for(.@i = 10; .@i<=22; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer35000: mapannounce instance_mapname("1@ma_h"),"Bangungot: Real pain! You will know!!",bc_map,"0xFF82FF"; - for(set .@i,25; .@i<=33; set .@i,.@i+1) + for(.@i = 25; .@i<=33; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer45000: @@ -622,13 +622,13 @@ OnTimer55000: donpcevent instance_npcname("#Summon Ward Mob")+"::OnEnable7"; end; OnTimer60000: - for(set .@i,1; .@i<=8; set .@i,.@i+1) + for(.@i = 1; .@i<=8; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); - for(set .@i,34; .@i<=38; set .@i,.@i+1) + for(.@i = 34; .@i<=38; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer60500: - for(set .@i,41; .@i<=49; set .@i,.@i+1) + for(.@i = 41; .@i<=49; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer90000: @@ -643,13 +643,13 @@ OnTimer125000: mapannounce instance_mapname("1@ma_h"),"Bangungot: You wanna hang out with me ......?",bc_map,"0xFF82FF"; end; OnTimer128000: - for(set .@i,1; .@i<=8; set .@i,.@i+1) + for(.@i = 1; .@i<=8; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); - for(set .@i,34; .@i<=38; set .@i,.@i+1) + for(.@i = 34; .@i<=38; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer128500: - for(set .@i,41; .@i<=49; set .@i,.@i+1) + for(.@i = 41; .@i<=49; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer129000: @@ -657,11 +657,11 @@ OnTimer129000: end; OnTimer129500: donpcevent instance_npcname("#Boss Room Entry")+"::OnSpawn"; - for(set .@i,10; .@i<=22; set .@i,.@i+1) + for(.@i = 10; .@i<=22; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer130000: - for(set .@i,25; .@i<=33; set .@i,.@i+1) + for(.@i = 25; .@i<=33; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); stopnpctimer; end; @@ -686,22 +686,22 @@ OnTimer6000: mapannounce instance_mapname("1@ma_h"),"Bangungot: ...defeat me again...?",bc_map,"0xFF82FF"; end; OnTimer9000: - for(set .@i,1; .@i<=8; set .@i,.@i+1) + for(.@i = 1; .@i<=8; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); - for(set .@i,34; .@i<=38; set .@i,.@i+1) + for(.@i = 34; .@i<=38; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer9500: - for(set .@i,41; .@i<=49; set .@i,.@i+1) + for(.@i = 41; .@i<=49; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer10000: mapannounce instance_mapname("1@ma_h"),"Bangungot: You stupid persoon....",bc_map,"0xFF82FF"; - for(set .@i,10; .@i<=22; set .@i,.@i+1) + for(.@i = 10; .@i<=22; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); end; OnTimer10500: - for(set .@i,25; .@i<=33; set .@i,.@i+1) + for(.@i = 25; .@i<=33; ++.@i) enablenpc instance_npcname("#Patternwarp"+.@i); stopnpctimer; end; @@ -717,8 +717,8 @@ OnTouch: specialeffect EF_CURSEATTACK; end; OnEnable1: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; areamonster .@map$,47,77,49,79,"Bangungot's Tiyanak",2340,1,.@label$; areamonster .@map$,49,77,51,79,"Bangungot's Tiyanak",2340,1,.@label$; areamonster .@map$,51,77,53,79,"Bangungot's Tiyanak",2340,1,.@label$; @@ -728,8 +728,8 @@ OnEnable1: areamonster .@map$,49,81,51,83,"Bangungot's Tiyanak",2339,1,.@label$; end; OnEnable2: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; areamonster .@map$,51,45,53,47,"Bangungot's Tiyanak",2339,1,.@label$; areamonster .@map$,53,45,55,47,"Bangungot's Tiyanak",2339,1,.@label$; areamonster .@map$,49,47,51,49,"Bangungot's Mangkukulam",2339,1,.@label$; @@ -739,8 +739,8 @@ OnEnable2: areamonster .@map$,53,49,55,51,"Bangungot's Tiyanak",2340,1,.@label$; end; OnEnable3: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; areamonster .@map$,69,75,71,77,"Bangungot's Tiyanak",2340,1,.@label$; areamonster .@map$,71,75,73,77,"Bangungot's Tiyanak",2340,1,.@label$; areamonster .@map$,73,75,75,77,"Bangungot's Tiyanak",2340,1,.@label$; @@ -750,8 +750,8 @@ OnEnable3: areamonster .@map$,71,79,73,81,"Bangungot's Tiyanak",2339,1,.@label$; end; OnEnable4: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; areamonster .@map$,73,45,75,47,"Bangungot's Tiyanak",2339,1,.@label$; areamonster .@map$,75,45,77,47,"Bangungot's Tiyanak",2339,1,.@label$; areamonster .@map$,71,47,73,49,"Bangungot's Mangkukulam",2339,1,.@label$; @@ -761,8 +761,8 @@ OnEnable4: areamonster .@map$,75,49,77,51,"Bangungot's Tiyanak",2340,1,.@label$; end; OnEnable5: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; areamonster .@map$,93,77,95,79,"Bangungot's Tiyanak",2340,1,.@label$; areamonster .@map$,95,77,97,79,"Bangungot's Tiyanak",2340,1,.@label$; areamonster .@map$,97,77,99,79,"Bangungot's Tiyanak",2340,1,.@label$; @@ -772,8 +772,8 @@ OnEnable5: areamonster .@map$,95,81,97,83,"Bangungot's Tiyanak",2339,1,.@label$; end; OnEnable6: - set .@map$, instance_mapname("1@ma_h"); - set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_h"); + .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead"; areamonster .@map$,93,43,95,45,"Bangungot's Tiyanak",2339,1,.@label$; areamonster .@map$,95,43,97,45,"Bangungot's Tiyanak",2339,1,.@label$; areamonster .@map$,91,45,93,47,"Bangungot's Mangkukulam",2339,1,.@label$; @@ -821,9 +821,9 @@ OnTimer10000: "Moaning Patient","Screaming Patient","Patient in Pain","Passed Out Patient","Patient with Nightmare","Sick Looking Patient", "Horrified Patient","Patient in Sorrow","Suffering Patient","Wriggling Patient","Patient in Cold Sweat","Howling Patient"; enablenpc instance_npcname("#Summon Ward Mob"); - set .@rand, rand(1,6); + .@rand = rand(1,6); donpcevent instance_npcname("#Summon Ward Mob")+"::OnEnable"+.@rand; - set .@id, (.@rand*2)-rand(2); + .@id = (.@rand*2)-rand(2); donpcevent instance_npcname(.@npc$[.@id]+"#"+.@id)+"::OnEnable"; stopnpctimer; end; @@ -851,7 +851,7 @@ OnMyMobDead: initnpctimer; end; OnTimer1000: - set .@map$, instance_mapname("1@ma_h"); + .@map$ = instance_mapname("1@ma_h"); if (mobcount(.@map$,instance_npcname("#Summon Pillar")+"::OnMyMobDead") < 1) { donpcevent instance_npcname("#Summon Pillar_time")+"::OnStopTimer"; donpcevent instance_npcname("#Summon Pillar")+"::OnEnable3"; @@ -968,17 +968,17 @@ OnTimer30000: end; OnEnable: switch(atoi(strnpcinfo(2))) { - case 2: set .@str$,"Screaming Patient: Aaaaargh!!"; break; - case 3: set .@str$,"Patient in Pain: Oooooowwww!! It's killing me!!!"; break; - case 4: set .@str$,"Passed Out Patient: ........"; break; - case 5: set .@str$,"Patient with Nightmare: Help~!!! Save me!!!"; break; - case 6: set .@str$,"Sick Looking Patient: Hu..a...aaah.."; break; - case 7: set .@str$,"Horrified Patient: Get away!! Please...."; break; - case 8: set .@str$,"Patient in Sorrow: crying and crying......"; break; - case 9: set .@str$,"Suffering Patient: Stop... please..."; break; - case 10: set .@str$,"Wriggling Patient: awwww..."; break; - case 11: set .@str$,"Patient in Cold Sweat: Help.....help...."; break; - case 12: set .@str$,"Howling Patient: aaaaahhhhhhhhhh!!"; break; + case 2: .@str$ = "Screaming Patient: Aaaaargh!!"; break; + case 3: .@str$ = "Patient in Pain: Oooooowwww!! It's killing me!!!"; break; + case 4: .@str$ = "Passed Out Patient: ........"; break; + case 5: .@str$ = "Patient with Nightmare: Help~!!! Save me!!!"; break; + case 6: .@str$ = "Sick Looking Patient: Hu..a...aaah.."; break; + case 7: .@str$ = "Horrified Patient: Get away!! Please...."; break; + case 8: .@str$ = "Patient in Sorrow: crying and crying......"; break; + case 9: .@str$ = "Suffering Patient: Stop... please..."; break; + case 10: .@str$ = "Wriggling Patient: awwww..."; break; + case 11: .@str$ = "Patient in Cold Sweat: Help.....help...."; break; + case 12: .@str$ = "Howling Patient: aaaaahhhhhhhhhh!!"; break; } mapannounce instance_mapname("1@ma_h"),.@str$,bc_map,"0xFF0000"; initnpctimer; @@ -1088,12 +1088,12 @@ OnInstanceInit: disablenpc instance_npcname("#Boss Room Exit"); disablenpc instance_npcname("#Boss Room Door"); disablenpc instance_npcname("#Boss Room Door1"); - for(set .@i,1; .@i<=8; set .@i,.@i+1) + for(.@i = 1; .@i<=8; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); - for(set .@i,34; .@i<=38; set .@i,.@i+1) + for(.@i = 34; .@i<=38; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); // Skip 39-40 since they're disabled in the official script. - for(set .@i,41; .@i<=49; set .@i,.@i+1) + for(.@i = 41; .@i<=49; ++.@i) disablenpc instance_npcname("#Patternwarp"+.@i); disablenpc instance_npcname("#ma_hos_warp_init"); end; diff --git a/npc/re/instances/BuwayaCave.txt b/npc/re/instances/BuwayaCave.txt index a24a0ae27..2333a2428 100644 --- a/npc/re/instances/BuwayaCave.txt +++ b/npc/re/instances/BuwayaCave.txt @@ -23,8 +23,8 @@ ma_fild02,312,317,5 script Guard#buwaya_cave 4_MAL_SOLDIER,{ close; } - set .@party_id,getcharid(1); - set .@md_name$,"Buwaya Cave"; + .@party_id = getcharid(1); + .@md_name$ = "Buwaya Cave"; if (!.@party_id) { mes "[Guard]"; @@ -73,7 +73,7 @@ ma_fild02,312,317,5 script Guard#buwaya_cave 4_MAL_SOLDIER,{ erasequest 4229; // fall through } - set .@instance,instance_create(.@md_name$,.@party_id); + .@instance = instance_create(.@md_name$,.@party_id); if (.@instance < 0) { mes "[Guard]"; mes "Party name is... "+getpartyname(.@party_id)+".";; @@ -247,8 +247,8 @@ OnInstanceInit: end; OnEnable: enablenpc instance_npcname("#box_mob_call"); - set .@label$, instance_npcname("#box_mob_call")+"::OnMyMobDead"; - set .@map$, instance_mapname("1@ma_c"); + .@label$ = instance_npcname("#box_mob_call")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_c"); monster .@map$,30,118,"Buwaya's Weakness",2333,1,.@label$; monster .@map$,35,118,"Buwaya's Weakness",2333,1,.@label$; end; @@ -271,8 +271,8 @@ OnEnable: enablenpc instance_npcname("#box_out"); end; OnTouch: - set .@x, rand(1,20) + 97; - set .@y, rand(1,20) + 74; + .@x = rand(1,20) + 97; + .@y = rand(1,20) + 74; warp instance_mapname("1@ma_c"),.@x,.@y; end; } @@ -286,7 +286,7 @@ OnInstanceInit: OnTimer30000: mapannounce instance_mapname("1@ma_c"),"Buwaya : I will put you in my treasure box!",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0 // Should execute OnTimer33000, but client doesn't render the effect fast enough. - for(set .@i,1; .@i<=9; set .@i,.@i+1) + for(.@i = 1; .@i<=9; ++.@i) donpcevent instance_npcname("#yunobi"+.@i)+"::OnEnable"; end; OnTimer33000: @@ -352,8 +352,8 @@ OnTimer64000: mapannounce instance_mapname("1@ma_c"),"Buwaya : This is...MY...Deadly... ATTACK!",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0 end; OnTimer65000: - set .@label$, instance_npcname("#bunshin")+"::OnMyMobDead"; - set .@map$, instance_mapname("1@ma_c"); + .@label$ = instance_npcname("#bunshin")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_c"); areamonster .@map$,112,89,122,99,"Buwaya",2332,1,.@label$; areamonster .@map$,112,49,122,59,"Buwaya",2332,1,.@label$; areamonster .@map$,72,49,82,59,"Buwaya",2332,1,.@label$; @@ -386,7 +386,7 @@ OnInstanceInit: areamonster instance_mapname("1@ma_c"),90,67,104,81,"Buwaya",2319,1,instance_npcname("#buwaya_con")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@ma_c"); + .@map$ = instance_mapname("1@ma_c"); if (mobcount(.@map$,instance_npcname("#buwaya_con")+"::OnMyMobDead") < 1) { donpcevent instance_npcname("#box_call")+"::OnDisable"; donpcevent instance_npcname("#bunshin")+"::OnDisable"; @@ -403,12 +403,12 @@ OnInstanceInit: initnpctimer; end; OnTimer60000: - set .@label$, instance_npcname("#exit_mob")+"::OnMyMobDead"; - set .@map$, instance_mapname("1@ma_c"); + .@label$ = instance_npcname("#exit_mob")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@ma_c"); if (mobcount(.@map$,.@label$) < 30) - set .@amount,10; + .@amount = 10; else - set .@amount,1; + .@amount = 1; areamonster .@map$,43,58,47,60,"Water Plant",2331,.@amount,.@label$; areamonster .@map$,43,58,47,60,"Egg",2329,.@amount,.@label$; stopnpctimer; @@ -440,7 +440,7 @@ OnTouch: 1@ma_c,1,1,0 script #buwaya_spawn_mobs -1,{ OnInstanceInit: - set .@map$, instance_mapname("1@ma_c"); + .@map$ = instance_mapname("1@ma_c"); areamonster .@map$,73,81,93,101,"Seaweed",2331,18; areamonster .@map$,110,97,116,103,"Seaweed",2331,8; areamonster .@map$,59,63,63,67,"Seaweed",2331,8; diff --git a/npc/re/instances/HazyForest.txt b/npc/re/instances/HazyForest.txt index 0467f612b..1baa1423f 100644 --- a/npc/re/instances/HazyForest.txt +++ b/npc/re/instances/HazyForest.txt @@ -20,8 +20,8 @@ //============================================================ bif_fild01,158,340,5 script Laphine Soldier#mist 4_M_FAIRYSOLDIER,{ - set .@party_id,getcharid(1); - set .@md_name$,"Mistwood Maze"; + .@party_id = getcharid(1); + .@md_name$ = "Mistwood Maze"; mes "[Laphine Soldier]"; mes "Are you going into the forest?"; @@ -84,7 +84,7 @@ bif_fild01,158,340,5 script Laphine Soldier#mist 4_M_FAIRYSOLDIER,{ mes "[Laphine Soldier]"; mes "Party Name "+getpartyname(.@party_id)+"..."; mes "Party Leader "+strcharinfo(0)+"..."; - set .@instance, instance_create(.@md_name$, .@party_id); + .@instance = instance_create(.@md_name$, .@party_id); if (.@instance < 0) { mes "Hmm..."; next; @@ -194,7 +194,7 @@ OnTimer180000: // callfunc "F_Mora_Mist",<warp to enable>,<success message>,<fail message>{,<end flag>} function script F_Mora_Mist { - set .@map$, instance_mapname("1@mist"); + .@map$ = instance_mapname("1@mist"); if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") == 0) { mes "Obviously no one is taking care of it."; mes "It seems like you can chop down the garden tree."; @@ -423,7 +423,7 @@ OnMyMobDead: "Gardeners: We're not dead, yet!!!!",1; end; OnInstanceInit: - set .@map$, instance_mapname("1@mist"); + .@map$ = instance_mapname("1@mist"); monster .@map$,318,137,"Baby Tom",2136,1,instance_npcname("The Gardeners' Tree")+"::OnMyMobDead"; monster .@map$,321,137,"Tomba the Baby",2136,1,instance_npcname("The Gardeners' Tree")+"::OnMyMobDead"; monster .@map$,324,137,"Exhausted Remi",2137,1,instance_npcname("The Gardeners' Tree")+"::OnMyMobDead"; @@ -513,7 +513,7 @@ OnInstanceInit: monster instance_mapname("1@mist"),.@c[0],.@c[1],"Wandering Purple Dragon",2131,1,instance_npcname("#Dragon Herder")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@mist"); + .@map$ = instance_mapname("1@mist"); if (mobcount(.@map$,instance_npcname("#Dragon Herder")+"::OnMyMobDead") == 0) { donpcevent instance_npcname("Collapsed Girl#mist")+"::OnEnable"; donpcevent instance_npcname("Mysterious Young Man#mis")+"::OnEnable"; @@ -599,7 +599,7 @@ OnTimer3000: mes "[Loki]"; mes "Now we have to say goodbye here."; mes "If you survive this forest, of course."; - set ep14_1_mistwoods,2; + ep14_1_mistwoods = 2; setquest 7212; close; case 2: @@ -607,7 +607,7 @@ OnTimer3000: mes "I understand."; mes "Step back if you aren't ready."; mes "This forest doesn't like strangers."; - set ep14_1_mistwoods,1; + ep14_1_mistwoods = 1; close; } } else if (ep14_1_mistwoods == 1) { @@ -645,7 +645,7 @@ OnTimer3000: mes "[Loki]"; mes "Now we have to say goodbye here."; mes "Hopefully, we will see each other again in Mora."; - set ep14_1_mistwoods,2; + ep14_1_mistwoods = 2; setquest 7212; close; } @@ -705,7 +705,7 @@ OnDisable: mes "I'll wait for her to wake up and get out of this forest."; mes "I can manage it on my own."; mes "I'll see you in Mora."; - set ep14_1_mistwoods,3; + ep14_1_mistwoods = 3; erasequest 7212; setquest 7213; close; @@ -778,7 +778,7 @@ mora,46,152,5 script Flower Smelling Lady 4_F_NYDHOG,{ mes "I thought I was forsaken..."; next; mes "The Guardian slowly looked away as if deep in thought."; - set ep14_1_mistwoods,4; + ep14_1_mistwoods = 4; close2; } else if (ep14_1_mistwoods == 4) { mes "- He seems to be deep in thought. -"; @@ -901,7 +901,7 @@ mora,48,152,3 script Sharp Eyed Man 4_M_ROKI2,{ next; mes "[Nydhogg the Guardian]"; mes "May the blessing of Mother Yggdrasil be with you..."; - set ep14_1_mistwoods,10; + ep14_1_mistwoods = 10; completequest 7213; getitem 2568,1; //Muffler_Of_Roki getitem 2858,1; //Pendant_Of_Guardian @@ -927,8 +927,8 @@ OnInstanceInit: monster instance_mapname("1@mist"),0,0,"Miming",2137,15,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@mist"); - set .@num_mobs, 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@mist"); + .@num_mobs = 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead"); if (.@num_mobs > 0) monster .@map$,0,0,"Miming",2137,.@num_mobs,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead"; end; @@ -940,8 +940,8 @@ OnInstanceInit: monster instance_mapname("1@mist"),0,0,"Pom Spider",2132,35,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@mist"); - set .@num_mobs, 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@mist"); + .@num_mobs = 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead"); if (.@num_mobs > 0) monster .@map$,0,0,"Pom Spider",2132,.@num_mobs,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead"; end; @@ -953,8 +953,8 @@ OnInstanceInit: monster instance_mapname("1@mist"),0,0,"Angra Mantis",2133,35,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@mist"); - set .@num_mobs, 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@mist"); + .@num_mobs = 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead"); if (.@num_mobs > 0) monster .@map$,0,0,"Angra Mantis",2133,.@num_mobs,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead"; end; @@ -966,8 +966,8 @@ OnInstanceInit: monster instance_mapname("1@mist"),0,0,"Parus",2134,35,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@mist"); - set .@num_mobs, 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@mist"); + .@num_mobs = 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead"); if (.@num_mobs > 0) monster .@map$,0,0,"Parus",2134,.@num_mobs,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead"; end; @@ -979,8 +979,8 @@ OnInstanceInit: monster instance_mapname("1@mist"),0,0,"Little Fatum",2136,15,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@mist"); - set .@num_mobs, 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@mist"); + .@num_mobs = 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead"); if (.@num_mobs > 0) monster .@map$,0,0,"Little Fatum",2136,.@num_mobs,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead"; end; diff --git a/npc/re/instances/MalangdoCulvert.txt b/npc/re/instances/MalangdoCulvert.txt index ef2af8512..0751b46a2 100644 --- a/npc/re/instances/MalangdoCulvert.txt +++ b/npc/re/instances/MalangdoCulvert.txt @@ -42,24 +42,24 @@ mal_in01,172,28,2 script Albo#mal 4_CAT_SAILOR5,{ setarray .@names$[0], "General Culvert Daily Service","^990000Hard Culvert Daily Service^000000", "General Culvert Weekly Service","^990000Hard Culvert Weekly Service^000000"; - set .@menu$,"Why are doing this job?:"; - for(set .@i,0; .@i<4; set .@i,.@i+1) { + .@menu$ = "Why are doing this job?:"; + for(.@i = 0; .@i<4; ++.@i) { if (questprogress(.@quests[.@i],PLAYTIME)) { - set .@status[.@i],2; - set .@menu$, .@menu$+"^aaaaaa- There is no new task -^000000:"; + .@status[.@i] = 2; + .@menu$ += "^aaaaaa- There is no new task -^000000:"; } else if (.@i%2 && BaseLevel < 140) { - set .@status[.@i],0; - set .@menu$, .@menu$+"^aaaaaaCan't take this job because level is too low^000000:"; + .@status[.@i] = 0; + .@menu$ += "^aaaaaaCan't take this job because level is too low^000000:"; } else { - set .@status[.@i],1; - set .@menu$, .@menu$+.@names$[.@i]+":"; + .@status[.@i] = 1; + .@menu$ += .@names$[.@i]+":"; } } mes "[Albo]"; mes "We crossed the sea!"; mes "We are great heroes of Culvert! We do not forgive the seafood that aims at Culvert!"; next; - set .@i, select(.@menu$)-1; + .@i = select(.@menu$)-1; if (.@i == 0) { mes "[Albo]"; mes "We used to be the henchmen of Mr. Missing! We almost became guards of such a historic site."; @@ -169,7 +169,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{ mes "Oh?"; mes "You're the one who took care of my big brother Albo's request. It was a hard job!"; next; - set .@i, select("What are you doing here?:General Culvert Daily Service Compensation:Hard Culvert Daily Service Compensation:General Culvert Weekly Service Compensation:Hard Culvert Weekly Service Compensation")-1; + .@i = select("What are you doing here?:General Culvert Daily Service Compensation:Hard Culvert Daily Service Compensation:General Culvert Weekly Service Compensation:Hard Culvert Weekly Service Compensation")-1; if (.@i == 0) { mes "[Madeca]"; mes "I'm here to help my big brother Albo!"; @@ -245,7 +245,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{ close; L_EraseQuest: - for(set .@j,0; .@j<getargcount(); set .@j,.@j+1) { + for(.@j = 0; .@j<getargcount(); ++.@j) { if (questprogress(getarg(.@j))) erasequest getarg(.@j); } @@ -376,7 +376,7 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{ mes "[Missing, the Cleaner]"; mes "Don't forget! I will not open the"; mes "door if you do not have Seagod Protection!"; - set in_canal_n,1; + in_canal_n = 1; close; } if (countitem(6436) == 0) { @@ -384,8 +384,8 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{ mes "You don't look like you have Seagod Protection. I can't open door at the moment!"; close; } - set .@party_id,getcharid(1); - set .@md_name$,"Culvert"; + .@party_id = getcharid(1); + .@md_name$ = "Culvert"; if (!.@party_id) { mes "^0000ffYou have to organize a party of"; mes "more than 1 member or be a member"; @@ -404,7 +404,7 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{ mes "What a rookie."; close; case 2: - set .@instance,instance_create(.@md_name$,.@party_id); + .@instance = instance_create(.@md_name$,.@party_id); if (.@instance < 0) { mes "Party name: "+getpartyname(.@party_id); mes "Party leader: "+strcharinfo(0); @@ -483,7 +483,7 @@ L_Enter: mes "Huh? Not ready yet? Talk to me again when you're ready."; close; } - set 'party_id,getcharid(1); + 'party_id = getcharid(1); mapannounce instance_mapname("1@pump"),"Missing: Move toward the 3 o'clock direction and wait for my next order!",bc_map,"0xff88ff",FW_NORMAL,15; disablenpc instance_npcname("Missing, the Cleaner#0"); enablenpc instance_npcname("Missing, the Cleaner#n"); @@ -505,7 +505,7 @@ L_Enter: mes "Hmm? Talk to me again when you're ready."; close; } - set 'party_id,getcharid(1); + 'party_id = getcharid(1); mapannounce instance_mapname("1@pump"),"Missing: I'll go in first, so follow me! I'll open up a gate at the 3 o'clock direction!",bc_map,"0xff88ff",FW_NORMAL,15; disablenpc instance_npcname("Missing, the Cleaner#0"); enablenpc instance_npcname("Culvert Entrance#i"); @@ -597,7 +597,7 @@ function script F_mal_missing { case 2: mes "[Missing, the Cleaner]"; mes "Ok! Let's start now!"; - set .@i$, charat(strnpcinfo(2),0); + .@i$ = charat(strnpcinfo(2),0); enablenpc instance_npcname("Missing, the Cleaner#"+.@i$); donpcevent instance_npcname("Missing, the Cleaner#"+.@i$)+"::OnStart"; disablenpc instance_npcname("Culvert Entrance#"+.@i$); @@ -625,9 +625,9 @@ OnStart: initnpctimer; end; OnAddSeaweed: - set .@map$, instance_mapname("1@pump"); + .@map$ = instance_mapname("1@pump"); areamonster .@map$,55,99,61,105,"Contaminated Seaweed",2191,1,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"; - set .@mob_dead_num, mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); if (.@mob_dead_num >= 6) donpcevent instance_npcname("Missing, the Cleaner#n")+"::OnFail"; else @@ -638,7 +638,7 @@ OnMyMobDead: OnFail: stopnpctimer; donpcevent instance_npcname("Monster Hole#n")+"::OnClear"; - set .@map$, instance_mapname("1@pump"); + .@map$ = instance_mapname("1@pump"); killmonster .@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"; enablenpc instance_npcname("Missing, the Cleaner#nf"); mapannounce .@map$,"What is this!! Seaweed is all over the culverts! You're done with cleaning! Get out!!",bc_map,"0xff88ff",FW_NORMAL,15; @@ -673,20 +673,20 @@ OnTimer300000: OnTimer350000: OnTimer400000: OnTimer450000: - set .@mob_dead_num, mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); if (.@mob_dead_num >= 6) donpcevent instance_npcname("Missing, the Cleaner#n")+"::OnFail"; else donpcevent instance_npcname("Monster Hole#n")+"::OnSpawn"; end; OnTimer515000: - set .@map$, instance_mapname("1@pump"); - set .@mob_dead_num, mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@pump"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); mapannounce .@map$,"Contaminated Seaweed: "+.@mob_dead_num+" stem. Missing will come and inspect the results of the cleaning soon.",bc_map,"0xff3333",FW_NORMAL,20; end; OnTimer520000: stopnpctimer; - set .@mob_dead_num, mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead"); if (.@mob_dead_num >= 6) donpcevent instance_npcname("Missing, the Cleaner#n")+"::OnFail"; else @@ -697,20 +697,20 @@ OnTimer520000: 1@pump,1,1,4 script Monster Hole#n -1,{ end; OnSpawn: - set .@i$, charat(strnpcinfo(2),0); + .@i$ = charat(strnpcinfo(2),0); if (.@i$ == "n") - set .@n,6; + .@n = 6; else if (.@i$ == "h") - set .@n,10; + .@n = 10; donpcevent instance_npcname("#Culvert_"+.@i$+rand(1,.@n))+"::OnEnable"; end; OnClear: - set .@i$, charat(strnpcinfo(2),0); + .@i$ = charat(strnpcinfo(2),0); if (.@i$ == "n") - set .@n,6; + .@n = 6; else if (.@i$ == "h") - set .@n,10; - for(set .@i,1; .@i<=.@n; set .@i,.@i+1) + .@n = 10; + for(.@i = 1; .@i<=.@n; ++.@i) donpcevent instance_npcname("#Culvert_"+.@i$+.@n)+"::OnClear"; end; } @@ -725,9 +725,9 @@ OnInstanceInit: end; OnEnable: enablenpc instance_npcname(strnpcinfo(0)); - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; - set .@map$, instance_mapname("1@pump"); - set .@index, atoi(charat(strnpcinfo(2),9)); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@map$ = instance_mapname("1@pump"); + .@index = atoi(charat(strnpcinfo(2),9)); switch(.@index) { case 1: setarray .@c[0],32,107,40,115; break; case 2: setarray .@c[0],64,120,72,128; break; @@ -746,7 +746,7 @@ OnEnable: getmapxy(.@map$,.@x,.@y,1); getpartymember 'party_id,2; copyarray .@partymemberaid[0],$@partymemberaid[0],$@partymembercount; - for(set .@i,0; .@i<$@partymembercount; set .@i,.@i+1) { + for(.@i = 0; .@i<$@partymembercount; ++.@i) { if (attachrid(.@partymemberaid[.@i])) { if (strcharinfo(3) == .@map$) viewpoint 0,.@x,.@y,.@index,0xFFFF00; @@ -786,7 +786,7 @@ OnEnable: initnpctimer; end; OnTimer100: - set .@i$, charat(strnpcinfo(2),0); + .@i$ = charat(strnpcinfo(2),0); if (.@i$ == "n") mapannounce instance_mapname("1@pump"),"Hmm! That wasn't so bad!",bc_map,"0xff88ff",FW_NORMAL,15; else if (.@i$ == "h") @@ -800,8 +800,8 @@ OnTimer10000: end; OnTimer20000: stopnpctimer; - set .@i$, charat(strnpcinfo(2),0); - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@i$ = charat(strnpcinfo(2),0); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; if (rand(1,100) > 50) { if (.@i$ == "n") monster instance_mapname("1@pump"),0,0,"Weird Coelacanth",2188,1,.@label$; @@ -819,29 +819,29 @@ OnTimer20000: OnMyMobDead: if (mobcount(strnpcinfo(4),instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) { mapannounce strnpcinfo(4),"You've destroyed all monsters in the culverts. There are trophies lying on the ground, please look for them.",bc_map,"0xffff00",FW_NORMAL,15; - set .@i$, charat(strnpcinfo(2),0); - set .@map$, strnpcinfo(4); + .@i$ = charat(strnpcinfo(2),0); + .@map$ = strnpcinfo(4); enablenpc instance_npcname("Culvert Entrance#"+.@i$); enablenpc instance_npcname("Missing, the Cleaner#"+.@i$+"o"); if (.@i$ == "n") { - for(set .@i,0; .@i<10; set .@i,.@i+1) { - set .@j, rand(1,6401); - if (.@j < 5001) set .@item,12636; //Malang_Sp_Can - else if (.@j < 5501) set .@item,12615; //Low_Coin_Pocket - else if (.@j < 6001) set .@item,12621; //Egrade_Pocket - else if (.@j < 6201) set .@item,12620; //Dgrade_Pocket - else if (.@j < 6401) set .@item,12623; //High_Weapon_Box + for(.@i = 0; .@i<10; ++.@i) { + .@j = rand(1,6401); + if (.@j < 5001) .@item = 12636; //Malang_Sp_Can + else if (.@j < 5501) .@item = 12615; //Low_Coin_Pocket + else if (.@j < 6001) .@item = 12621; //Egrade_Pocket + else if (.@j < 6201) .@item = 12620; //Dgrade_Pocket + else if (.@j < 6401) .@item = 12623; //High_Weapon_Box else continue; makeitem .@item,1,.@map$,rand(40,77),rand(87,120); } } else if (.@i$ == "h") { - for(set .@i,0; .@i<10; set .@i,.@i+1) { - set .@j, rand(1,5001); - if (.@j < 2001) set .@item,12615; //Low_Coin_Pocket - else if (.@j < 3001) set .@item,12621; //Egrade_Pocket - else if (.@j < 4001) set .@item,12620; //Dgrade_Pocket - else if (.@j < 4501) set .@item,12619; //Cgrade_Pocket - else if (.@j < 5001) set .@item,12623; //High_Weapon_Box + for(.@i = 0; .@i<10; ++.@i) { + .@j = rand(1,5001); + if (.@j < 2001) .@item = 12615; //Low_Coin_Pocket + else if (.@j < 3001) .@item = 12621; //Egrade_Pocket + else if (.@j < 4001) .@item = 12620; //Dgrade_Pocket + else if (.@j < 4501) .@item = 12619; //Cgrade_Pocket + else if (.@j < 5001) .@item = 12623; //High_Weapon_Box else continue; makeitem .@item,1,.@map$,rand(40,77),rand(87,120); } @@ -852,7 +852,7 @@ OnMyMobDead: } 1@pump,84,105,4 script Missing, the Cleaner#no 4_CAT_SAILOR2,{ - set .@i$, charat(strnpcinfo(2),0); + .@i$ = charat(strnpcinfo(2),0); if (.@i$ == "n") { mes "[Missing, the Cleaner]"; mes "I was very surprised!!"; @@ -916,9 +916,9 @@ OnStart: initnpctimer; end; OnAddSeaweed: - set .@map$, instance_mapname("2@pump"); + .@map$ = instance_mapname("2@pump"); areamonster .@map$,75,78,85,88,"Contaminated Seaweed",2191,1,instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"; - set .@mob_dead_num, mobcount(.@map$,instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"); if (.@mob_dead_num >= 6) donpcevent instance_npcname("Missing, the Cleaner#h")+"::OnFail"; else @@ -929,7 +929,7 @@ OnMyMobDead: OnFail: stopnpctimer; donpcevent instance_npcname("Monster Hole#h")+"::OnClear"; - set .@map$, instance_mapname("2@pump"); + .@map$ = instance_mapname("2@pump"); killmonster .@map$, instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"; enablenpc instance_npcname("Missing, the Cleaner#hf"); mapannounce .@map$,"What is this!! Seaweed is all over the culverts! You're done with cleaning! Get out!!",bc_map,"0xff88ff",FW_NORMAL,15; @@ -964,7 +964,7 @@ OnTimer240000: OnTimer280000: OnTimer320000: OnTimer360000: - set .@mob_dead_num, mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"); if (.@mob_dead_num >= 6) donpcevent instance_npcname("Missing, the Cleaner#h")+"::OnFail"; else @@ -975,7 +975,7 @@ OnTimer420000: end; OnTimer425000: stopnpctimer; - set .@mob_dead_num, mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead"); if (.@mob_dead_num >= 6) donpcevent instance_npcname("Missing, the Cleaner#h")+"::OnFail"; else @@ -993,9 +993,9 @@ OnInstanceInit: end; OnEnable: enablenpc instance_npcname(strnpcinfo(0)); - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; - set .@map$, instance_mapname("2@pump"); - set .@index, atoi(substr(strnpcinfo(2),9,getstrlen(strnpcinfo(2))-1)); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@map$ = instance_mapname("2@pump"); + .@index = atoi(substr(strnpcinfo(2),9,getstrlen(strnpcinfo(2))-1)); switch(.@index) { case 1: setarray .@c[0],49,110,57,118; break; case 2: setarray .@c[0],75,105,83,113; break; diff --git a/npc/re/instances/OctopusCave.txt b/npc/re/instances/OctopusCave.txt index cbf45e5f1..c55d5e2bf 100644 --- a/npc/re/instances/OctopusCave.txt +++ b/npc/re/instances/OctopusCave.txt @@ -19,8 +19,8 @@ //============================================================ mal_dun01,151,235,5 script Starfish 4_ASTER,{ - set .@party_id,getcharid(1); - set .@md_name$,"Octopus Cave"; + .@party_id = getcharid(1); + .@md_name$ = "Octopus Cave"; if (!.@party_id) { mes "[Starfish]"; @@ -85,7 +85,7 @@ mal_dun01,151,235,5 script Starfish 4_ASTER,{ } if (.@playtime == 2) erasequest 4197; if (countitem(6442)) { - set .@instance,instance_create(.@md_name$,.@party_id); + .@instance = instance_create(.@md_name$,.@party_id); if (.@instance < 0) { mes "[Starfish]"; mes "Party name is... "+getpartyname(.@party_id)+"."; @@ -209,7 +209,7 @@ OnEnable: donpcevent instance_npcname("oct_foot2")+"::OnEnable"; donpcevent instance_npcname("oct_foot3")+"::OnEnable"; donpcevent instance_npcname("oct_foot4")+"::OnEnable"; - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,20,114,"Octopus Leg#1",2193,1,instance_npcname("oct_foot_4")+"::OnMyMobDead"; monster .@map$,88,190,"Octopus Leg#2",2193,1,instance_npcname("oct_foot_4")+"::OnMyMobDead"; monster .@map$,307,215,"Octopus Leg#3",2193,1,instance_npcname("oct_foot_4")+"::OnMyMobDead"; @@ -219,7 +219,7 @@ OnDisable: disablenpc instance_npcname("oct_foot_4"); end; OnMyMobDead: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); if (mobcount(.@map$,instance_npcname("oct_foot_4")+"::OnMyMobDead") < 1) { donpcevent instance_npcname("oct_boss_con")+"::OnEnable"; mapannounce .@map$,"Hey you!! I'll personally take care of you all! Let's bring it on!",bc_map,"0x00ff99"; @@ -238,9 +238,9 @@ OnInstanceInit: end; OnEnable: enablenpc instance_npcname(strnpcinfo(0)); - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; - set .@i, atoi(charat(strnpcinfo(0),8)); - set .@map$, instance_mapname("1@cash"); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@i = atoi(charat(strnpcinfo(0),8)); + .@map$ = instance_mapname("1@cash"); switch(.@i) { case 1: areamonster .@map$,34,96,38,100,"Octopus's Henchman",2192,3,.@label$; @@ -308,10 +308,10 @@ OnTouch: initnpctimer; end; OnTimer5000: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); mapannounce .@map$,"Let's give them a lesson!",bc_map,"0xFFFF00"; - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; - set .@i, atoi(charat(strnpcinfo(0),8)); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@i = atoi(charat(strnpcinfo(0),8)); switch(.@i) { case 1: areamonster .@map$,18,112,22,116,"Octopus's Henchman",2192,3,.@label$; @@ -334,17 +334,17 @@ OnTimer5000: OnTimer30000: setd "."+strnpcinfo(0)+instance_id(),0; stopnpctimer; - set .@i, atoi(charat(strnpcinfo(0),8)); + .@i = atoi(charat(strnpcinfo(0),8)); donpcevent instance_npcname("oct_foot_exit"+.@i)+"::OnEnable"; donpcevent instance_npcname(strnpcinfo(0))+"::OnDisable"; end; OnMyMobDead: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) { mapannounce .@map$,"You hurt my babies!!? You'll have to pay for this!!!",bc_map,"0x00ff99"; setd "."+strnpcinfo(0)+instance_id(),0; stopnpctimer; - set .@i, atoi(charat(strnpcinfo(0),8)); + .@i = atoi(charat(strnpcinfo(0),8)); donpcevent instance_npcname("oct_foot_exit"+.@i)+"::OnEnable"; donpcevent instance_npcname(strnpcinfo(0))+"::OnDisable"; end; @@ -377,7 +377,7 @@ OnInstanceInit: donpcevent instance_npcname("oct_mob_con")+"::OnDisable"; end; OnEnable: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); enablenpc instance_npcname("oct_mob_con"); monster .@map$,32,94,"Hydra",1068,1; monster .@map$,41,101,"Hydra",1068,1; @@ -439,7 +439,7 @@ OnInstanceInit: disablenpc instance_npcname("oct_backattack1"); end; OnTouch: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,39,59,"Hydra",1068,1; monster .@map$,40,59,"Hydra",1068,1; monster .@map$,41,59,"Hydra",1068,1; @@ -465,28 +465,28 @@ OnTouch: if (getd("."+instance_id())) end; setd "."+instance_id(),1; initnpctimer; - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,71,105,"Octopus's Henchman ",2192,1; mapannounce .@map$,"Headquarters are empty, GO!!!",bc_map,"0x00ff99"; hideonnpc instance_npcname("oct_backattack2"); end; OnTimer2000: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,71,105,"Octopus's Henchman ",2192,1; mapannounce .@map$,"Run, RUN! Go, GO!!!",bc_map,"0x00ff99"; end; OnTimer4000: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,71,105,"Octopus's Henchman ",2192,1; mapannounce .@map$,"No time, come out fast!",bc_map,"0x00ff99"; end; OnTimer6000: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,71,105,"Octopus's Henchman ",2192,3; mapannounce .@map$,"Let's take over the headquarters!!!",bc_map,"0x00ff99"; end; OnTimer8000: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,71,105,"Octopus's Henchman ",2192,1; mapannounce .@map$,"There is no time to lose, hurry up!!!",bc_map,"0x00ff99"; stopnpctimer; @@ -504,7 +504,7 @@ OnInstanceInit: OnTouch: if (getd("."+instance_id())) end; setd "."+instance_id(),1; - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,293,153,"Octopus's Henchman ",2192,1; monster .@map$,294,152,"Octopus's Henchman ",2192,1; monster .@map$,292,153,"Octopus's Henchman ",2192,1; @@ -531,7 +531,7 @@ OnInstanceInit: OnTouch: if (getd("."+instance_id())) end; setd "."+instance_id(),1; - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); monster .@map$,332,37,"Octopus's Henchman ",2192,1; monster .@map$,332,36,"Octopus's Henchman ",2192,1; monster .@map$,332,35,"Octopus's Henchman ",2192,1; @@ -623,7 +623,7 @@ OnAnnounce: mapannounce instance_mapname("1@cash"),"Disgusting Octopus : "+getarg(rand(3)),bc_map,"0xFFFF00"; return; OnMyMobDead: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); if (mobcount(.@map$,instance_npcname("oct_boss_con")+"::OnMyMobDead") < 1) { mapannounce .@map$,"Disgusting Octopus : That's it for the today! Next time, I will play with you badly!",bc_map,"0xFFFF00"; enablenpc instance_npcname("oct_exit_1"); @@ -646,7 +646,7 @@ OnEnable: initnpctimer; end; OnCall: - set .@map$, instance_mapname("1@cash"); + .@map$ = instance_mapname("1@cash"); if (mobcount(.@map$,instance_npcname("oct_boss_foot")+"::OnMyMobDead") < 100) { switch(rand(2)) { case 0: diff --git a/npc/re/instances/OldGlastHeim.txt b/npc/re/instances/OldGlastHeim.txt index 48f2d6493..be0d4d002 100644 --- a/npc/re/instances/OldGlastHeim.txt +++ b/npc/re/instances/OldGlastHeim.txt @@ -23,9 +23,9 @@ glast_01,204,273,6 script Hugin#ghinstance 4_M_SAGE_C,{ .@ghins_time = questprogress(12317,PLAYTIME); if (!.@ghins_time) { - set .@party_id,getcharid(1); - set .@p_name$,getpartyname(.@party_id); - set .@md_name$,"Old Glast Heim"; + .@party_id = getcharid(1); + .@p_name$ = getpartyname(.@party_id); + .@md_name$ = "Old Glast Heim"; if (!instance_check_party(.@party_id,2)) { //custom @@ -35,12 +35,12 @@ glast_01,204,273,6 script Hugin#ghinstance 4_M_SAGE_C,{ } if (getcharid(0) == getpartyleader(.@party_id,2)) - set .@menu$, "Create the time gap.:Enter the Old Glast Heim.:Cancel."; + .@menu$ = "Create the time gap.:Enter the Old Glast Heim.:Cancel."; else - set .@menu$, ":Enter the Old Glast Heim.:Cancel."; + .@menu$ = ":Enter the Old Glast Heim.:Cancel."; switch(select(.@menu$)) { case 1: - set .@instance, instance_create(.@md_name$,.@party_id); + .@instance = instance_create(.@md_name$,.@party_id); if (.@instance < 0) { mes "Party Name: "+.@p_name$; mes "Party Leader: "+strcharinfo(0); @@ -151,7 +151,7 @@ OnDisable: OnDisable2: hideonnpc instance_npcname("Varmunt#ghinstance1"); - for(set .@i,1; .@i<=20; set .@i,.@i+4) { + for(.@i = 1; .@i<=20; .@i += 4) { hideoffnpc instance_npcname("Khalitzburg Crusader#"+.@i); hideoffnpc instance_npcname("Khalitzburg Crusader#"+(.@i+1)); hideoffnpc instance_npcname("White Knight#"+(.@i+2)); @@ -507,7 +507,7 @@ OnTimer85000: donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk7"; hideonnpc instance_npcname("Varmunt#ghinstance1"); - for(set .@i,1; .@i<=20; set .@i,.@i+4) { + for(.@i = 1; .@i<=20; .@i += 4) { hideonnpc instance_npcname("Khalitzburg Crusader#"+.@i); hideonnpc instance_npcname("Khalitzburg Crusader#"+(.@i+1)); hideonnpc instance_npcname("White Knight#"+(.@i+2)); @@ -516,8 +516,8 @@ OnTimer85000: hideonnpc instance_npcname("Khalitzburg Crusader#21"); hideonnpc instance_npcname("Khalitzburg Crusader#22"); - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#talkinstance1")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#talkinstance1")+"::OnMyMobDead"; monster .@map$,145,59,"Abyss Knight",2470,1,.@label$; monster .@map$,154,59,"Abyss Knight",2470,1,.@label$; monster .@map$,145,69,"Abyss Knight",2470,1,.@label$; @@ -529,7 +529,7 @@ OnTimer85000: monster .@map$,145,99,"Abyss Knight",2470,1,.@label$; monster .@map$,154,99,"Abyss Knight",2470,1,.@label$; - for(set .@i,1; .@i<=22; set .@i,.@i+1) + for(.@i = 1; .@i<=22; ++.@i) hideoffnpc instance_npcname(".#ghinstance"+.@i); donpcevent instance_npcname(".#ghinstance22")+"::OnTalkK"; @@ -548,7 +548,7 @@ OnTimer85000: OnTimer88000: donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk8"; - for(set .@i,1; .@i<=20; set .@i,.@i+4) { + for(.@i = 1; .@i<=20; .@i += 4) { hideonnpc instance_npcname(".#ghinstance"+.@i); hideonnpc instance_npcname(".#ghinstance"+(.@i+1)); disablenpc instance_npcname(".#ghinstance"+(.@i+2)); @@ -557,8 +557,8 @@ OnTimer88000: hideonnpc instance_npcname(".#ghinstance21"); hideonnpc instance_npcname(".#ghinstance22"); - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#talkinstance1")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#talkinstance1")+"::OnMyMobDead"; monster .@map$,145,54,"Khalitzburg",2471,1,.@label$; monster .@map$,154,54,"Khalitzburg",2471,1,.@label$; monster .@map$,145,64,"Khalitzburg",2471,1,.@label$; @@ -784,8 +784,8 @@ OnEnable: enablenpc instance_npcname(strnpcinfo(0)); end; OnTouch: - set .@map1$, instance_mapname("1@gl_k"); - set .@map2$, instance_mapname("2@gl_k"); + .@map1$ = instance_mapname("1@gl_k"); + .@map2$ = instance_mapname("2@gl_k"); switch(atoi(replacestr(strnpcinfo(2),"ghinstancewarp",""))) { case 1: warp .@map1$,80,80; break; case 2: warp .@map1$,105,80; break; @@ -826,8 +826,8 @@ OnDisable: end; OnEnable: enablenpc instance_npcname("#ghmemorialmob01"); - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob01")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob01")+"::OnMyMobDead"; areamonster .@map$,76,99,87,10,"Suffering Chamberlain",2466,15,.@label$; areamonster .@map$,67,39,12,6,"Fallen Monk",2465,20,.@label$; areamonster .@map$,67,39,12,6,"Suffering Chamberlain",2466,3,.@label$; @@ -835,9 +835,9 @@ OnEnable: areamonster .@map$,45,84,6,137,"Decayed Butler",2464,12,.@label$; end; OnMyMobDead: - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob01")+"::OnMyMobDead"; - set .@mob_dead_num, 56 - mobcount(.@map$,.@label$); + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob01")+"::OnMyMobDead"; + .@mob_dead_num = 56 - mobcount(.@map$,.@label$); if (.@mob_dead_num > 35) { mapannounce .@map$, "Seems like Himmelmez drains the dead's souls. They must be destroyed.",bc_map,"0xFFFFFF"; killmonster .@map$,.@label$; @@ -966,8 +966,8 @@ OnEnable: enablenpc instance_npcname("#ghmemorialmob02"); donpcevent instance_npcname("#ghinstancewarp3")+"::OnEnable"; donpcevent instance_npcname("#ghinstancewarp4")+"::OnEnable"; - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob02")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob02")+"::OnMyMobDead"; mapannounce .@map$,"3 o'clock warp leading to zone 3 is now open.",bc_map,"0xFFFF00"; areamonster .@map$,241,113,291,19,"Suffering Chamberlain",2466,12,.@label$; areamonster .@map$,241,113,291,19,"Decayed Monk",2464,12,.@label$; @@ -975,9 +975,9 @@ OnEnable: areamonster .@map$,227,217,291,135,"Decayed Monk",2464,12,.@label$; end; OnMyMobDead: - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob02")+"::OnMyMobDead"; - set .@mob_dead_num, 48 - mobcount(.@map$,.@label$); + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob02")+"::OnMyMobDead"; + .@mob_dead_num = 48 - mobcount(.@map$,.@label$); if (.@mob_dead_num > 28) { mapannounce .@map$, "Seems like Himmelmez drains the dead's souls. They must be destroyed.",bc_map,"0xFFFFFF"; killmonster .@map$,.@label$; @@ -992,12 +992,12 @@ OnMyMobDead: 1@gl_k,221,82,3 script Breathless Man#GHtramp1 4_M_DIEMAN,4,4,{ end; OnTouch: - set .@i, rand(1,10); - if (.@i == 1) set .@mobs,3; - else if (.@i == 2) set .@mobs,4; - else if (.@i == 3) set .@mobs,5; - else if (.@i < 7) set .@mobs,6; - else set .@mobs,7; + .@i = rand(1,10); + if (.@i == 1) .@mobs = 3; + else if (.@i == 2) .@mobs = 4; + else if (.@i == 3) .@mobs = 5; + else if (.@i < 7) .@mobs = 6; + else .@mobs = 7; getmapxy(.@map$,.@x,.@y,1); specialeffect EF_VENOMDUST; monster .@map$,.@x,.@y,"Muck Worm",2467,.@mobs,instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; @@ -1060,8 +1060,8 @@ OnEnable: enablenpc instance_npcname("#ghmemorialmob03"); donpcevent instance_npcname("#ghinstancewarp5")+"::OnEnable"; donpcevent instance_npcname("#ghinstancewarp6")+"::OnEnable"; - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob03")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob03")+"::OnMyMobDead"; mapannounce .@map$,"12 o'clock warp leading to the zone 4 was opened.",bc_map,"0xFFFF00"; areamonster .@map$,17,259,53,180,"Decayed Guard",2468,11,.@label$; areamonster .@map$,17,259,53,180,"Sharpshooter Ranger",2469,14,.@label$; @@ -1073,9 +1073,9 @@ OnEnable: areamonster .@map$,108,281,231,234,"Sharpshooter Ranger",2469,14,.@label$; end; OnMyMobDead: - set .@map$, instance_mapname("1@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob03")+"::OnMyMobDead"; - set .@mob_dead_num, 100 - mobcount(.@map$,.@label$); + .@map$ = instance_mapname("1@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob03")+"::OnMyMobDead"; + .@mob_dead_num = 100 - mobcount(.@map$,.@label$); if (.@mob_dead_num > 85) { mapannounce .@map$,"Himmelmez: Nice parry. I thought you were going to die slowly surrounded by the dead I summoned~",bc_map,"0xFFFFFF"; killmonster .@map$,.@label$; @@ -1102,7 +1102,7 @@ OnEnable: monster instance_mapname("1@gl_k"),150,258,"Root of Corruption",2475,1,instance_npcname("#ghmemorialmob04")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("1@gl_k"); + .@map$ = instance_mapname("1@gl_k"); if (mobcount(.@map$,instance_npcname("#ghmemorialmob04")+"::OnMyMobDead") < 1) { mapannounce .@map$, "12 o'clock warp leading to the Chivalry's Second Floor is now open.",bc_map,"0xFFFF00"; donpcevent instance_npcname("#ghinstancewarp7")+"::OnEnable"; @@ -1520,25 +1520,25 @@ OnDisable: end; OnEnable: enablenpc instance_npcname("#ghmemorialmob05"); - set .@map$, instance_mapname("2@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob05")+"::OnMyMobDead"; + .@map$ = instance_mapname("2@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob05")+"::OnMyMobDead"; areamonster .@map$,124,20,31,162,"Decayed Guard",2468,8,.@label$; areamonster .@map$,124,20,31,162,"Sharpshooter Ranger",2469,8,.@label$; areamonster .@map$,124,20,31,162,"Fallen Abyss Knight",2470,8,.@label$; areamonster .@map$,124,20,31,162,"Suffering Khalitzburg",2471,8,.@label$; areamonster .@map$,124,20,31,162,"Swollen Knight",2472,8,.@label$; - set .MyMobs,80; + .MyMobs = 80; end; OnMyMobDead: - set .@map$, instance_mapname("2@gl_k"); - set .MyMobs, .MyMobs-1; + .@map$ = instance_mapname("2@gl_k"); + --.MyMobs; if (.MyMobs == 0) { mapannounce .@map$, "A being with an evil aura seems to be appearing in this region.",bc_map,"0xFFFF00"; donpcevent instance_npcname("#ghmemorialmob06")+"::OnDisable2"; donpcevent instance_npcname("#ghmemorialmob07")+"::OnEnable"; donpcevent instance_npcname("#ghmemorialmob05")+"::OnDisable"; } else { - set .@label$, instance_npcname("#ghmemorialmob05")+"::OnMyMobDead"; + .@label$ = instance_npcname("#ghmemorialmob05")+"::OnMyMobDead"; switch(rand(5)) { case 0: areamonster .@map$,124,20,31,162,"Decayed Guard",2468,1,.@label$; @@ -1579,8 +1579,8 @@ OnSpawn: initnpctimer; end; OnTimer90000: - set .@map$, instance_mapname("2@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob05")+"::OnMyMobDead"; + .@map$ = instance_mapname("2@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob05")+"::OnMyMobDead"; setarray .@c[0], 114,141,118,139, 128,83,131,78, @@ -1589,7 +1589,7 @@ OnTimer90000: 58,83,63,78, 69,138,80,127, 34,143,39,138; - for(set .@i,0; .@i<getarraysize(.@c); set .@i,.@i+4) { + for(.@i = 0; .@i<getarraysize(.@c); .@i += 4) { areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Decayed Guard",2468,1,.@label$; areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Sharpshooter Ranger",2469,1,.@label$; areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Fallen Abyss Knight",2470,1,.@label$; @@ -1615,7 +1615,7 @@ OnEnable: areamonster instance_mapname("2@gl_k"),124,20,31,162,"The Destruction of the First Captain",2473,1,instance_npcname("#ghmemorialmob07")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("2@gl_k"); + .@map$ = instance_mapname("2@gl_k"); if (mobcount(.@map$,instance_npcname("#ghmemorialmob07")+"::OnMyMobDead") < 1) { mapannounce .@map$, "3 o'clock positioned warp leading to the 2nd zone has been opened. Use the central hallway to get there.",bc_map,"0xFFFF00"; donpcevent instance_npcname("#ghinstancewarp10")+"::OnEnable"; @@ -1635,24 +1635,24 @@ OnDisable: end; OnEnable: enablenpc instance_npcname("#ghmemorialmob08"); - set .@map$, instance_mapname("2@gl_k"); - set .@label$, instance_npcname("#ghmemorialmob08")+"::OnMyMobDead"; + .@map$ = instance_mapname("2@gl_k"); + .@label$ = instance_npcname("#ghmemorialmob08")+"::OnMyMobDead"; areamonster .@map$,175,163,265,18,"Decayed Guard",2468,7,.@label$; areamonster .@map$,175,163,265,18,"Sharpshooter Ranger",2469,7,.@label$; areamonster .@map$,175,163,265,18,"Fallen Abyss Knight",2470,7,.@label$; areamonster .@map$,175,163,265,18,"Suffering Khalitzburg",2471,7,.@label$; areamonster .@map$,175,163,265,18,"Swollen Knight",2472,7,.@label$; - set .MyMobs,35; + .MyMobs = 35; end; OnMyMobDead: - set .@map$, instance_mapname("2@gl_k"); - set .MyMobs, .MyMobs-1; + .@map$ = instance_mapname("2@gl_k"); + --.MyMobs; if (.MyMobs == 0) { mapannounce .@map$, "A being with an evil aura seems to be appearing in this region.",bc_map,"0xFFFF00"; donpcevent instance_npcname("#ghmemorialmob09")+"::OnEnable"; donpcevent instance_npcname("#ghmemorialmob08")+"::OnDisable"; } else { - set .@label$, instance_npcname("#ghmemorialmob08")+"::OnMyMobDead"; + .@label$ = instance_npcname("#ghmemorialmob08")+"::OnMyMobDead"; switch(rand(5)) { case 0: areamonster .@map$,175,163,265,18,"Decayed Guard",2468,1,.@label$; @@ -1686,7 +1686,7 @@ OnEnable: areamonster instance_mapname("2@gl_k"),175,163,265,18,"The Destruction of the Second Captain",2474,1,instance_npcname("#ghmemorialmob09")+"::OnMyMobDead"; end; OnMyMobDead: - set .@map$, instance_mapname("2@gl_k"); + .@map$ = instance_mapname("2@gl_k"); if (mobcount(.@map$,instance_npcname("#ghmemorialmob09")+"::OnMyMobDead") < 1) { mapannounce .@map$, "12 o'clock positioned warp leading to the 3rd zone has been opened. Use the central hallway to get there.",bc_map,"0xFFFF00"; donpcevent instance_npcname("#ghinstancewarp12")+"::OnEnable"; diff --git a/npc/re/jobs/1-1/acolyte.txt b/npc/re/jobs/1-1/acolyte.txt index 07c37a07c..3ba4bcce9 100644 --- a/npc/re/jobs/1-1/acolyte.txt +++ b/npc/re/jobs/1-1/acolyte.txt @@ -143,7 +143,7 @@ prt_fild03,365,255,2 script Ascetic#aco 4_M_ORIENT02,{ mes "Farewell."; close2; savepoint "prt_fild03",361,255; - set job_acolyte_q,6; + job_acolyte_q = 6; end; } else { @@ -211,7 +211,7 @@ moc_fild07,41,355,4 script Ascetic#2aco 4_F_SISTER,{ mes "Please return to the Prontera Sanctuary and speak to the Priest in charge."; close2; savepoint "moc_fild07",35,355; - set job_acolyte_q,7; + job_acolyte_q = 7; end; } else { @@ -288,7 +288,7 @@ prt_fild00,208,218,6 script Ascetic#3aco 4W_M_02,{ mes "Now go back to the Santuary and finish becoming an Acolyte, kid."; close2; savepoint "prt_fild00",206,230; - set job_acolyte_q,8; + job_acolyte_q = 8; end; } else { diff --git a/npc/re/jobs/1-1/thief.txt b/npc/re/jobs/1-1/thief.txt index 4b04f9efa..f327d1892 100644 --- a/npc/re/jobs/1-1/thief.txt +++ b/npc/re/jobs/1-1/thief.txt @@ -151,7 +151,7 @@ moc_prydb1,39,129,2 script Thief Guide#thief 1_F_04,{ mes "[Thief Guildsman]"; mes "Well, I'm not in charge of making you a Thief. I just accept applications, get it?"; mes "If you want to become a Thief, ask the guy next to me."; - set q_job_thief,1; + q_job_thief = 1; close; } @@ -166,7 +166,7 @@ moc_prydb1,42,133,2 script Thief Guildsman#thief 2_M_THIEFMASTER,{ mes "'"+strcharinfo(0)+".'"; mes "'For those who are ready, the moonlight shall open the way. Now you are fully ready, I now officially allow you to become a member of the Thief Guild.'"; callfunc "Job_Change",Job_Thief; - set q_job_thief,0; + q_job_thief = 0; getitem 13041,1; // N_Main_Gauche next; mes "[Commander of Thief Guild]"; diff --git a/npc/re/jobs/3-1/archbishop.txt b/npc/re/jobs/3-1/archbishop.txt index 2daf9d7b5..78e35ef34 100644 --- a/npc/re/jobs/3-1/archbishop.txt +++ b/npc/re/jobs/3-1/archbishop.txt @@ -122,7 +122,7 @@ prt_church,103,88,3 script Praying Minister#arch 1_M_PASTOR,{ mes "He's very old so he is hard of hearing."; mes "You have to speak loud and clearly. You got it?"; mes "I hope that this paves the way for you to live in the light of Odin."; - set job_arch,1; + job_arch = 1; setquest 2187; close; case 2: @@ -308,7 +308,7 @@ umbala,139,227,3 script Priest#arch 1_M_PASTOR,{ mes "After making your pilgrimage, let's have a drink together and talk about your experience."; next; mes "- Priest Dayan smiles again. -"; - set job_arch,2; + job_arch = 2; changequest 2187,2188; close; } else if (job_arch == 2) { @@ -405,7 +405,7 @@ umbala,139,227,3 script Priest#arch 1_M_PASTOR,{ mes "Thank you very much."; mes "Feel free to visit here when you want to pray, "+(Sex?"brother.":"sister."); mes "A visit from a friend always makes me happy."; - set job_arch,4; + job_arch = 4; changequest 2188,2189; close; } @@ -559,7 +559,7 @@ OnTouch: mes "[" + strcharinfo(0) + "]"; mes "That was refreshing."; mes "I guess I should go back to Priest Dayan."; - set job_arch,3; + job_arch = 3; close2; warp "umbala",138,219; end; @@ -707,7 +707,7 @@ hu_in01,205,204,7 script Praying Nun#benew 1_F_PRIEST,{ mes "[Vinue]"; mes "I'll pray for your safe return."; mes "I hope that Odin gives you his protection as well."; - set job_arch,5; + job_arch = 5; changequest 2189,2190; close; } else if ((job_arch > 4) && (job_arch < 100)) { @@ -901,11 +901,11 @@ job3_arch01,29,34,3 script Valkyrie#arch 4_F_VALKYRIE2,{ mes "[Valkyrie Anguhilde]"; mes "When you finish preparing to go on, talk to me again."; mes "It'll be a long journey..."; - set job_arch,6; + job_arch = 6; close; } else if (job_arch == 6) { if ($@archbs == 0) { - set $@archbs,1; + $@archbs = 1; mes "[Valkyrie Anguhilde]"; mes "" + strcharinfo(0) + " Did you finish preparing for your way of asceticism?"; next; @@ -913,19 +913,19 @@ job3_arch01,29,34,3 script Valkyrie#arch 4_F_VALKYRIE2,{ mes "[Valkyrie Anguhilde]"; mes "Hmm, someone is battling the devil in the shrine right now."; mes "You just wait a minute while I'm finding who it is."; - set $@archbs,0; + $@archbs = 0; close; } mes "[Valkyrie Anguhilde]"; mes "Ok. Now I'm going to send you there."; mes "^FF0000When you go there, you have to summon my impersonation with the scroll^000000. Don't forget."; - set $@archbs,0; + $@archbs = 0; close2; nude; if (countitem(2798)) delitem 2798,countitem(2798); //Will_Of_Exhausted_Angel donpcevent "start#arch::OnEnable"; - set job_arch,7; + job_arch = 7; changequest 2190,2191; warp "job3_arch02",119,49; hideonnpc "Valkyrie#arch"; @@ -938,20 +938,20 @@ job3_arch01,29,34,3 script Valkyrie#arch 4_F_VALKYRIE2,{ if (countitem(12381)) delitem 12381,countitem(12381); //ValkyrieA_Scroll if (countitem(12382)) delitem 12382,countitem(12382); //ValkyrieB_Scroll if ($@archbs == 0) { - set $@archbs,1; + $@archbs = 1; mes "[Valkyrie Anguhilde]"; mes "Are you ok human?"; mes "It was not as easy as I expected."; mes "Will you challenge again?"; next; if (getmapusers("job3_arch02") > 0) { - set $@archbs,0; + $@archbs = 0; mes "[Valkyrie Anguhilde]"; mes "Hmm, someone is battling the devil in the shrine right now."; mes "You just wait a minute while I'm finding who it is."; close; } - set $@archbs,0; + $@archbs = 0; mes "[Valkyrie Anguhilde]"; mes "OK. now I'm going to send you there."; mes "^FF0000When you go there, you have to summon my impersonation with the scroll^000000."; @@ -962,7 +962,7 @@ job3_arch01,29,34,3 script Valkyrie#arch 4_F_VALKYRIE2,{ if (countitem(2798)) delitem 2798,countitem(2798); //Will_Of_Exhausted_Angel donpcevent "start#arch::OnEnable"; - set job_arch,7; + job_arch = 7; warp "job3_arch02",119,49; hideonnpc "Valkyrie#arch"; end; @@ -974,7 +974,7 @@ job3_arch01,29,34,3 script Valkyrie#arch 4_F_VALKYRIE2,{ } end; OnBc: - set $@archbs,0; + $@archbs = 0; mapannounce "job3_arch01","Valkyrie: I think someone fell down in the shrine. I can hear the devil's unpleasant laugh.",bc_map,"0xFFCE00"; hideoffnpc "Valkyrie#arch"; end; @@ -997,7 +997,7 @@ OnTouch: } else if (getmercinfo(1) == 2037) { if (strnpcinfo(0) == "#arch_1_10") viewpoint 1,113,327,1,0xFF9900; - set .@randht, rand(1,10); + .@randht = rand(1,10); if (.@randht < 8) mapannounce "job3_arch02","Whispering of an impersonation: I can feel the devil's spirits! Be careful!",bc_map,"0xFFCE00"; else if ((.@randht == 8) || (.@randht == 9)) @@ -1293,7 +1293,7 @@ OnTouch: if (countitem(2798)) delitem 2798,countitem(2798); //Will_Of_Exhausted_Angel delitem 6154,countitem(6154); //Broken_Horn_Pipe - set job_arch,100; + job_arch = 100; completequest 2191; getitem 5747,1; //Mitra getitem 2795,1; //Green_Apple_Ring @@ -1344,7 +1344,7 @@ OnTouch: delitem 12382,1; //ValkyrieB_Scroll // fall through } else if (getmercinfo(1) == 2038) { - set .@randht, rand(1,10); + .@randht = rand(1,10); if (.@randht < 8) mapannounce "job3_arch02","Whispering of an impersonation: I can feel the devil's spirits. Can you hear? The sound of gathering in crowds.",bc_map,"0xFFCE00"; else if ((.@randht == 8) || (.@randht == 9)) @@ -1656,11 +1656,11 @@ job3_arch01,1,1,1 script control#arch CLEAR_NPC,{ next; switch(select("0:1")) { case 1: - set $@archbs,0; + $@archbs = 0; hideoffnpc "Valkyrie#arch"; close; case 2: - set $@archbs,1; + $@archbs = 1; hideoffnpc "Valkyrie#arch"; close; } diff --git a/npc/re/jobs/3-1/guillotine_cross.txt b/npc/re/jobs/3-1/guillotine_cross.txt index 63d1b6106..5a75aeb84 100644 --- a/npc/re/jobs/3-1/guillotine_cross.txt +++ b/npc/re/jobs/3-1/guillotine_cross.txt @@ -83,14 +83,14 @@ que_job01,75,96,3 script Guild Member#3rdgc01 4_M_MOCASS1,{ mes "[Ahcart]"; mes "You should be able to find it easily."; mes "Go now."; - set job_3rd_gc, 3; + job_3rd_gc = 3; setquest 7101; close; case 2: mes "[Ahcart]"; mes "Got it."; mes "But don't think about it for too long."; - set job_3rd_gc, 2; + job_3rd_gc = 2; close; } } @@ -102,7 +102,7 @@ que_job01,75,96,3 script Guild Member#3rdgc01 4_M_MOCASS1,{ mes "[Ahcart]"; mes "Of course, a chapter of the assassin guild is not only in Morroc. If you have a chance to go there, visit there."; mes "I think you might go there."; - set job_3rd_gc, 1; + job_3rd_gc = 1; close; } mes "[A man of a sharp impression]"; @@ -130,7 +130,7 @@ que_job01,75,96,3 script Guild Member#3rdgc01 4_M_MOCASS1,{ mes "[Ahcart]"; mes "You should be able to find it easily."; mes "Go now."; - set job_3rd_gc, 3; + job_3rd_gc = 3; setquest 7101; close; case 2: @@ -152,17 +152,32 @@ que_job01,75,96,3 script Guild Member#3rdgc01 4_M_MOCASS1,{ } function script func_3rdgc { - set .@n$, "["+strcharinfo(0)+"]"; + .@n$ = "["+strcharinfo(0)+"]"; mes .@n$; mes "Let me collect all the information..."; - set .@i,0; - if (questprogress(7112) == 1) { mes "Madelle saw a person who looked like a priest from Rachel late at night."; set .@i,.@i+1; } - if (questprogress(7113) == 1) { mes "Crave said that there was a girl who bought lots of things day and night."; set .@i,.@i+1; } - if (questprogress(7114) == 1) { mes "Trovan said that there was a guy who could be seen often but is not a hotel guest, so he is suspicious."; set .@i,.@i+1; } + .@i = 0; + if (questprogress(7112) == 1) { + mes "Madelle saw a person who looked like a priest from Rachel late at night."; + ++.@i; + } + if (questprogress(7113) == 1) { + mes "Crave said that there was a girl who bought lots of things day and night."; + ++.@i; + } + if (questprogress(7114) == 1) { + mes "Trovan said that there was a guy who could be seen often but is not a hotel guest, so he is suspicious."; + ++.@i; + } if (!getarg(0)) { - set .@i,.@i-2; - if (questprogress(7115) == 1) { mes "A peddler wears shabby clothes, but she buys fresh and expensive things every single day."; set .@i,.@i+1; } - if (questprogress(7116) == 1) { mes "The old man in village said that there was a girl who showed up in same place at the same time, so maybe moved here."; set .@i,.@i+1; } + .@i -= 2; + if (questprogress(7115) == 1) { + mes "A peddler wears shabby clothes, but she buys fresh and expensive things every single day."; + ++.@i; + } + if (questprogress(7116) == 1) { + mes "The old man in village said that there was a girl who showed up in same place at the same time, so maybe moved here."; + ++.@i; + } } next; if (.@i == 3) { @@ -182,7 +197,7 @@ function script func_3rdgc { next; mes .@n$; mes "Let me rethink this."; - set job_3rd_gc, 7; + job_3rd_gc = 7; close; case 2: mes .@n$; @@ -212,7 +227,7 @@ function script func_3rdgc { mes .@n$; mes "Crave said that she comes here day and night to buy stuff regularly."; mes "Then I know what I have to do."; - set job_3rd_gc, 8; + job_3rd_gc = 8; close; } } @@ -284,7 +299,7 @@ job3_guil01,82,95,3 script Daora#3rdgc02 4_F_DESERT,{ mes "Yeah, can you find an entrance to an alley in the corner?"; mes "Go in there, then you can hear a more detailed story."; mes "Take on this special task~!"; - set job_3rd_gc, 4; + job_3rd_gc = 4; changequest 7101,7102; close; } @@ -352,7 +367,7 @@ job3_guil01,82,95,3 script Daora#3rdgc02 4_F_DESERT,{ mes "So, don't worry."; mes "Are you supposed to be here for her?"; mes "Go ahead."; - set job_3rd_gc, 11; + job_3rd_gc = 11; close; } else if (job_3rd_gc == 11) { mes "She is in a room."; @@ -395,7 +410,7 @@ job3_guil01,82,95,3 script Daora#3rdgc02 4_F_DESERT,{ next; mes "[Daora]"; mes "If you need to, visit me anytime and I'll serve you a drink after your task is done."; - set job_3rd_gc, 6; + job_3rd_gc = 6; close; } else if (job_3rd_gc == 6) { if (questprogress(7091) == 1) { @@ -875,7 +890,7 @@ job3_guil01,16,20,4 script Mayshell#3rdgc03 4_F_KHELLISIA,{ mes strcharinfo(0)+"."; mes "Time is not waiting for you."; mes "Go ahead. Spill blood with the blade of a knife that stands for a stoic life."; - set job_3rd_gc, 5; + job_3rd_gc = 5; changequest 7102,7103; close; } else if (job_3rd_gc == 5) { @@ -937,7 +952,7 @@ job3_guil01,16,20,4 script Mayshell#3rdgc03 4_F_KHELLISIA,{ mes "This is the last step."; mes "Don't make any mistakes."; delitem 6150,1; //Key_Of_The_Mansion - set job_3rd_gc, 15; + job_3rd_gc = 15; changequest 7108,7109; close; } else if (job_3rd_gc == 15) { @@ -978,11 +993,11 @@ job3_guil01,16,20,4 script Mayshell#3rdgc03 4_F_KHELLISIA,{ if (job_3rd_gc == 18) { mes "The evaluation of your task is... [S]."; mes "[S] is for 'special'."; - set .@quest,7099; + .@quest = 7099; } else { mes "The evaluation of your task is... [A]."; mes "If you were punctual, you would have received higher."; - set .@quest,7096; + .@quest = 7096; } next; } else { @@ -1001,11 +1016,11 @@ job3_guil01,16,20,4 script Mayshell#3rdgc03 4_F_KHELLISIA,{ if (.@all_wine > 3) { if (job_3rd_gc == 18) { mes "The evaluation of your task is... [B]."; - set .@quest,7097; + .@quest = 7097; } else { mes "The evaluation of your task is... [C]."; mes "You need to act by yourself."; - set .@quest,7098; + .@quest = 7098; } next; } else { @@ -1016,10 +1031,10 @@ job3_guil01,16,20,4 script Mayshell#3rdgc03 4_F_KHELLISIA,{ mes "I like that."; if (job_3rd_gc == 18) { mes "The evaluation of your task is... [A]."; - set .@quest,7096; + .@quest = 7096; } else { mes "The evaluation of your task is... [B]."; - set .@quest,7097; + .@quest = 7097; } next; } @@ -1035,7 +1050,7 @@ job3_guil01,16,20,4 script Mayshell#3rdgc03 4_F_KHELLISIA,{ mes "[Mayshell]"; mes "I reward you for your labor, and I'm going to give you a present."; mes "I got this one from guild, I hope it's helpful to you."; - set job_3rd_gc, 20; + job_3rd_gc = 20; getitem 12106,1; //Accessory_Box erasequest 7091; erasequest 7092; @@ -1927,7 +1942,7 @@ veins,223,180,3 script Girl#3rdgc09 4_F_DST_CHILD,{ mes "I know everything."; close; case 2: - set .@ans00, 0; + .@ans00 = 0; mes "[Melissa]"; mes "Ok, answer my question."; mes "Is it a boy or a girl?"; @@ -1940,7 +1955,7 @@ veins,223,180,3 script Girl#3rdgc09 4_F_DST_CHILD,{ case 2: mes "[Melissa]"; mes "A girl and..."; - set .@ans00, .@ans00+1; + ++.@ans00; break; } next; @@ -1960,7 +1975,7 @@ veins,223,180,3 script Girl#3rdgc09 4_F_DST_CHILD,{ case 3: mes "[Melissa]"; mes "Light orange to blonde hair."; - set .@ans00, .@ans00+1; + ++.@ans00; break; case 4: mes "[Melissa]"; @@ -1980,7 +1995,7 @@ veins,223,180,3 script Girl#3rdgc09 4_F_DST_CHILD,{ mes "[Melissa]"; mes "A young person."; mes "Like you?"; - set .@ans00, .@ans00+1; + ++.@ans00; break; case 3: mes "[Melissa]"; @@ -2017,7 +2032,7 @@ veins,223,180,3 script Girl#3rdgc09 4_F_DST_CHILD,{ mes "Hehehe!"; erasequest 7103; setquest 7104; - set job_3rd_gc, 9; + job_3rd_gc = 9; next; mes "[Melissa]"; mes "She has to be who you're looking for. I'm never wrong."; @@ -2091,7 +2106,7 @@ OnTouch: donpcevent "Estillda#3rdgc10::OnEnable"; next; select("Make a surprise attack."); - set .@c_spec, readparam(bDex)+readparam(bAspd)+readparam(bCritical); + .@c_spec = readparam(bDex)+readparam(bAspd)+readparam(bCritical); if (.@c_spec > 209 || (!rand(2) && .@c_spec > 190 && .@c_spec < 210) || (!rand(3) && .@c_spec < 191)) { mes "You take her by the wrist trying not to let her see you."; mes "The food that she is holding falls on the floor."; @@ -2163,7 +2178,7 @@ OnTouch: donpcevent "Estillda#3rdgc10::OnDisable"; if (questprogress(7104)) erasequest 7104; if (questprogress(7105)) erasequest 7105; - set job_3rd_gc, 10; + job_3rd_gc = 10; setquest 7106; next; mes "- The pub in the underground of Veins is the best place to keep her safe. -"; @@ -2294,7 +2309,7 @@ job3_guil01,79,15,1 script Estillda#3rdgc11 4_F_SHABBY,{ next; mes "["+strcharinfo(0)+"]"; mes "To go back home without an accident."; - set job_3rd_gc, 12; + job_3rd_gc = 12; changequest 7106,7107; close; case 2: @@ -2319,7 +2334,7 @@ job3_guil01,79,15,1 script Estillda#3rdgc11 4_F_SHABBY,{ veins,206,56,0 script #3rdgc_battleroom01 HIDDEN_WARP_NPC,1,1,{ end; OnInit: - set $@3rdgc_room01, 0; + $@3rdgc_room01 = 0; end; OnTouch: if (job_3rd_gc == 12) { @@ -2330,7 +2345,7 @@ OnTouch: case 1: if ($@3rdgc_room01 == 0) { warp "job3_guil02",34,44; - set $@3rdgc_room01, 1; + $@3rdgc_room01 = 1; } else { mes "You tried to open the door but it's locked."; mes "It doesn't show any signs of life."; @@ -2375,7 +2390,7 @@ OnTouch: mes "You don't have to come here now."; close; warp "veins",178,62; - set $@3rdgc_room01, 0; + $@3rdgc_room01 = 0; end; } end; @@ -2395,7 +2410,7 @@ OnTimer299000: donpcevent "#3rdgc_room01_mag01::OnEnable"; end; OnTimer300000: - set $@3rdgc_room01, 0; + $@3rdgc_room01 = 0; stopnpctimer; end; } @@ -2405,11 +2420,11 @@ job3_guil02,51,43,7 script A man with black clothes 4_M_DSTMAN,4,4,{ OnInit: OnDisable: hideonnpc "A man with black clothes"; - set .on,0; + .on = 0; end; OnEnable: hideoffnpc "A man with black clothes"; - set .on,1; + .on = 1; end; OnReset: killmonster "job3_guil02","A man with black clothes::OnMyMobDead"; @@ -2470,7 +2485,7 @@ OnTimer61000: donpcevent "Dandelion#3rdgc12::OnDisable"; donpcevent "A man with black clothes::OnDisable"; donpcevent "#3rdgc_room01_mag01::OnEnable"; - set $@3rdgc_room01, 0; + $@3rdgc_room01 = 0; stopnpctimer; end; } @@ -2497,7 +2512,7 @@ job3_guil02,49,43,5 script Dandelion#3rdgc12 4_M_DSTMANDEAD,{ mes "It's too late to save him."; mes "He passed away."; mes "You find a key with a fancy decoration around his neck."; - set job_3rd_gc, 13; + job_3rd_gc = 13; getitem 6150,1; //Key_Of_The_Mansion changequest 7107,7108; close; @@ -2635,7 +2650,7 @@ ra_in01,175,196,3 script Oresa Rava#3rdgc13 4_M_LGTGRAND,{ mes "Send over that key."; next; mes "- Find the owner of that key soon and tell Mayshell. -"; - set job_3rd_gc, 14; + job_3rd_gc = 14; close; } else if (job_3rd_gc == 14) { mes "That key is of a mansion built in a gorge of Veins."; @@ -2686,9 +2701,9 @@ ve_fild02,330,384,3 script Girl#3rdgc14 4_F_GUILLOTINE,{ case 1: if ($@3rdgc_room02 == 0) { erasequest ((job_3rd_gc == 17)?7110:7109); - set job_3rd_gc, 17; + job_3rd_gc = 17; setquest 7110; - set $@3rdgc_room02, 1; + $@3rdgc_room02 = 1; warp "job3_guil03",22,70; } else { mes "[Renzak]"; @@ -2697,7 +2712,7 @@ ve_fild02,330,384,3 script Girl#3rdgc14 4_F_GUILLOTINE,{ next; mes "[Renzak]"; mes "It'll be easy to infiltrate because it's covered by the cliff's shadow."; - set job_3rd_gc, 16; + job_3rd_gc = 16; } close; case 2: @@ -2708,7 +2723,7 @@ ve_fild02,330,384,3 script Girl#3rdgc14 4_F_GUILLOTINE,{ erasequest 7110; setquest 7109; } - set job_3rd_gc, 16; + job_3rd_gc = 16; close; } } else if (job_3rd_gc > 18) { @@ -2727,7 +2742,7 @@ ve_fild02,330,384,3 script Girl#3rdgc14 4_F_GUILLOTINE,{ close; } OnInit: - set $@3rdgc_room02, 0; + $@3rdgc_room02 = 0; end; } @@ -2751,7 +2766,7 @@ OnTouch: mes "You don't have to come here."; close2; warp "ve_fild02",330,379; //Pre-RE: ve_fild05 (341,303) - set $@3rdgc_room02, 0; + $@3rdgc_room02 = 0; } end; OnTimer900000: @@ -2812,7 +2827,7 @@ OnReset: donpcevent "Priest from Rachel::OnDisable"; donpcevent "Renzak#3rdgc16::OnDisable"; donpcevent "#3rdgc_event01::OnEnable"; - set $@3rdgc_room02, 0; + $@3rdgc_room02 = 0; end; } @@ -3353,7 +3368,7 @@ OnMyMobDead: job3_guil03,2,2,0 script #3rdgc_sunchal_kill01 CLEAR_NPC,{ end; OnEnable: - set .@i, atoi(charat(strnpcinfo(0),20)); + .@i = atoi(charat(strnpcinfo(0),20)); setarray .@x[1],74,124,103; setarray .@y[1],63, 78, 24; monster "job3_guil03",.@x[.@i],.@y[.@i],"Guard",1985,1,strnpcinfo(0)+"::OnMyMobDead"; @@ -3399,7 +3414,7 @@ OnReset: killmonster "job3_guil03",strnpcinfo(0)+"::OnMyMobDead"; end; OnTouch: - set .@i, atoi(charat(strnpcinfo(0),19)); + .@i = atoi(charat(strnpcinfo(0),19)); setarray .@x[1],64,86,83; setarray .@y[1],68,63,36; mapannounce "job3_guil03","Guard : Who are you?!",bc_map,"0x7b68ee"; //FW_NORMAL 12 0 0 @@ -3434,7 +3449,7 @@ OnTimer: setarray .@x[1],.@x-2,.@x+2; setarray .@y[1],.@y-2,.@y+2; sleep 1000; - for(set .@i,0; .@i<9; set .@i,.@i+1) { + for(.@i = 0; .@i<9; ++.@i) { if (getareausers(.@map$,.@x[1],.@y[1],.@x[2],.@y[2]) < 1) end; sleep 1000; @@ -3478,11 +3493,11 @@ job3_guil03,111,51,7 script Priest from Rachel 4_M_MIDDLE1,{ end; OnInit: OnDisable: - set .on,0; + .on = 0; hideonnpc "Priest from Rachel"; end; OnEnable: - set .on,1; + .on = 1; hideoffnpc "Priest from Rachel"; end; OnReset: @@ -3536,7 +3551,7 @@ OnTimer61000: end; OnTimer61500: donpcevent "#3rdgc_event01::OnEnable"; - set $@3rdgc_room02, 0; + $@3rdgc_room02 = 0; stopnpctimer; end; } @@ -3551,12 +3566,12 @@ job3_guil03,146,70,3 script Renzak#3rdgc16 4_F_GUILLOTINE,{ if (questprogress(7110,PLAYTIME) == 1) { mes "You finished quickly."; mes "Good job."; - set job_3rd_gc, 18; + job_3rd_gc = 18; } else { mes "I told you that you have to finish within 10 minutes."; mes "You might be exhausted."; mes "Fortunately you are ok."; - set job_3rd_gc, 19; + job_3rd_gc = 19; } erasequest 7110; setquest 7111; @@ -3657,16 +3672,16 @@ job3_guil01,148,53,3 script Bercasell#3rdgc16 4_M_GUILLOTINE,{ setlook 7,0; jobchange roclass(eaclass()|EAJL_THIRD); if (questprogress(7096) == 1) { - set job_3rd_gc, 25; + job_3rd_gc = 25; erasequest 7096; } else if (questprogress(7097) == 1) { - set job_3rd_gc, 26; + job_3rd_gc = 26; erasequest 7097; } else if (questprogress(7098) == 1) { - set job_3rd_gc, 27; + job_3rd_gc = 27; erasequest 7098; } else if (questprogress(7099) == 1) { - set job_3rd_gc, 28; + job_3rd_gc = 28; erasequest 7099; } getitem 2795,1; //Green_Apple_Ring @@ -3840,7 +3855,7 @@ job3_guil02,1,3,0 script #GMhelper01_gc CLEAR_NPC,{ mes "What can I do for you?"; next; if (callfunc("F_GM_NPC",1854,0) == 1) { - set .@room01, $@3rdgc_room01; + .@room01 = $@3rdgc_room01; mes "I check the recent situation."; mes "The battle situation of storage: "+.@room01+""; mes "1 : In progress. 0 : Standby status."; @@ -3859,7 +3874,7 @@ job3_guil02,1,3,0 script #GMhelper01_gc CLEAR_NPC,{ donpcevent "Dandelion#3rdgc12::OnDisable"; donpcevent "A man with black clothes::OnDisable"; donpcevent "#3rdgc_room01_mag01::OnEnable"; - set $@3rdgc_room01, 0; + $@3rdgc_room01 = 0; next; mes "Complete a reset."; close; @@ -3879,7 +3894,7 @@ job3_guil03,1,8,0 script #GMhelper02_gc CLEAR_NPC,{ mes "What can I do for you?"; next; if (callfunc("F_GM_NPC",1854,0) == 1) { - set .@room02, $@3rdgc_room02; + .@room02 = $@3rdgc_room02; mes "Check the recent situation."; mes "The battle situation of the mansion is: "+.@room02+""; mes "1 : In progress. 0 : Standby status."; @@ -3930,7 +3945,7 @@ job3_guil03,1,8,0 script #GMhelper02_gc CLEAR_NPC,{ mes "We start to expel by force."; mes "Just put the enter button now."; donpcevent "#3rdgc_event01::OnEnable"; - set $@3rdgc_room02, 0; + $@3rdgc_room02 = 0; close2; mapwarp "job3_guil03","ve_fild02",330,379; //Pre-RE: ve_fild05 (341,303) end; diff --git a/npc/re/jobs/3-1/mechanic.txt b/npc/re/jobs/3-1/mechanic.txt index 73e74983c..227d59d00 100644 --- a/npc/re/jobs/3-1/mechanic.txt +++ b/npc/re/jobs/3-1/mechanic.txt @@ -71,7 +71,7 @@ yuno,129,156,3 script Chainheart 4_M_DOCTOR,{ mes "As I said before if the passion and the talent are real there would be no problem!"; mes "Congratulations for walking through a new path as a Mechanic!"; next; - set job__mechanic,12; + job__mechanic = 12; completequest 10101; if (Sex) getitem 5749,1; //Driver_Band @@ -154,7 +154,7 @@ yuno,129,156,3 script Chainheart 4_M_DOCTOR,{ mes "for yourself like we did."; mes "Don't just wait around for someone to teach it to you. Show the passion that you claim to have."; next; - set job__mechanic,3; + job__mechanic = 3; changequest 10091,10092; mes "[Chainheart]"; mes "Anyway, whatever your choice might be I expect you to do your best."; @@ -207,7 +207,7 @@ yuno,129,156,3 script Chainheart 4_M_DOCTOR,{ mes "I want to explain more but it's too technical."; mes "I don't want to bore you more."; next; - set job__mechanic,2; + job__mechanic = 2; changequest 10090,10091; mes "[Chainheart]"; mes "Anyway if you become one of us you can form your own definition and explanation of Mechanics yourself."; @@ -241,7 +241,7 @@ yuno,129,156,3 script Chainheart 4_M_DOCTOR,{ mes "That isn't as simple to explain but I'll give it a try."; next; setquest 10090; - set job__mechanic,1; + job__mechanic = 1; mes "[Chainheart]"; mes "Sorry, I'm starting"; mes "to talk too much."; @@ -375,7 +375,7 @@ jupe_cave,37,55,5 script Scholar#Mechanic 4_M_ALCHE_D,{ mes "has told me how to warp to"; mes "the midway point to Juperos."; next; - set job__mechanic,4; + job__mechanic = 4; mes "[Scholar]"; mes "It is true that it becomes easy"; mes "but you can't help the fear"; @@ -417,7 +417,7 @@ jupe_core2,149,273,3 script Ghostfire#1 4_NFWISP,{ mes "[?]"; mes "My name... name is... Fr..."; close2; - set job__mechanic,11; + job__mechanic = 11; changequest 10100,10101; warp "yuno",157,83; end; @@ -461,7 +461,7 @@ jupe_core2,149,273,3 script Ghostfire#1 4_NFWISP,{ next; if (job__mechanic == 3 || job__mechanic == 4) changequest 10092,10094; - set job__mechanic,5; + job__mechanic = 5; mes "[?]"; mes "Knowledge isn't obtained from others. It is found through one's own efforts."; mes "Find your own knowledge path."; @@ -523,7 +523,7 @@ jupe_core2,53,75,3 script Ghostfire#2 4_NFWISP,{ mes "[?]"; mes "The recent events of the world have created a confusion so my research hasn't been shared with the rest of the world."; next; - set job__mechanic,6; + job__mechanic = 6; changequest 10094,10095; mes "[?]"; mes "So... I came back to Juperos to continue my investigation of science and magic."; @@ -564,7 +564,7 @@ jupe_core2,242,62,3 script Ghostfire#3 4_NFWISP,{ mes "[?]"; mes "I don't regret gaining the knowledge. All I wish is that I could have my body back."; next; - set job__mechanic,7; + job__mechanic = 7; changequest 10095,10096; mes "[?]"; mes "After I had poured my energy into the statue, I figured that I could move my energy to different statues."; @@ -596,7 +596,7 @@ OnTouch: mes "-a sacrificial offering-"; mes "-the statue of a human.-"; next; - set job__mechanic,8; + job__mechanic = 8; changequest 10096,10097; mes "-Most certain of all is that-"; mes "-I started to feel the urge-"; @@ -695,7 +695,7 @@ OnTouch: mes "-head instructed, let's go to-"; mes "-the southern foothold.-"; close2; - set job__mechanic,9; + job__mechanic = 9; changequest 10098,10099; donpcevent "#Door::OnDisable"; end; @@ -716,7 +716,7 @@ OnTouch: mes "-to know about mechanics-"; mes "-and magic machinery.-"; next; - set job__mechanic,10; + job__mechanic = 10; changequest 10099,10100; specialeffect EF_POTION_CON; mes "-This amount of knowledge-"; diff --git a/npc/re/jobs/3-1/ranger.txt b/npc/re/jobs/3-1/ranger.txt index 6c86be78b..9ed4152b3 100644 --- a/npc/re/jobs/3-1/ranger.txt +++ b/npc/re/jobs/3-1/ranger.txt @@ -110,7 +110,7 @@ tur_dun01,156,36,5 script Survival Instructor#jr01 1_M_ORIENT01,{ mes "[Survival Instructor, Rescue]"; mes "To do this you need to be cleansed of body and soul."; mes "Make sure that your weight equals '0' to continue."; - set job_ranger01,1; + job_ranger01 = 1; setquest 8254; close2; warp "alberta",117,57; @@ -144,7 +144,7 @@ tur_dun01,156,36,5 script Survival Instructor#jr01 1_M_ORIENT01,{ mes "[Survival Instructor, Rescue]"; mes "Well, let's talk about the details when you get the qualification for taking the test."; mes "When you want to take the survival power test, please talk to me again."; - set job_ranger01,2; + job_ranger01 = 2; changequest 8254,8255; close; } @@ -193,7 +193,7 @@ tur_dun01,156,36,5 script Survival Instructor#jr01 1_M_ORIENT01,{ mes "Well, then let's start."; mes "There's no time to hesitate."; mes "Do your best."; - set job_ranger01,3; + job_ranger01 = 3; changequest 8255,8256; getitem 1703,1; //Bow__ getitem 12323,10; //N_Fly_Wing @@ -380,7 +380,7 @@ tur_dun01,91,169,3 script Test Instructor#jr02 4_M_JOB_HUNTER,{ mes "[Test Instructor, Teardrop]"; mes "If you run out of the provided items, we cannot support you more so take care."; mes "Consider this as an extension of the survival power test."; - set job_ranger01,4; + job_ranger01 = 4; changequest 8256,8257; close; } else if (job_ranger01 == 4) { @@ -400,7 +400,7 @@ tur_dun01,91,169,3 script Test Instructor#jr02 4_M_JOB_HUNTER,{ mes "Well, before I explain, could you please give me that Dragonfly wing?"; mes "You've heard the saying, 'in any situation, eating comes first'?"; delitem 7064,1; //Dragon_Fly_Wing - set job_ranger01,5; + job_ranger01 = 5; changequest 8257,8258; close; } @@ -654,13 +654,13 @@ L_Start: if (countitem(1750) < 100) { mes "[Test Instructor, Teardrop]"; mes "Okay, once again I'll provide you with arrows, then I'll let you in."; - set .@arrow,1; + .@arrow = 1; next; } mes "[Test Instructor, Teardrop]"; mes "Good luck."; mes "Become a Ranger and we shall meet again."; - set job_ranger01,6; + job_ranger01 = 6; if (getarg(0) == 0) changequest 8258,8259; else { @@ -802,12 +802,12 @@ OnDisable: job3_rang02,100,95,0 script Test Supervisor#jr_04 HIDDEN_WARP_NPC,{ OnInit: - set $@job_rang_point01,0; + $@job_rang_point01 = 0; disablenpc "Test Supervisor#jr_04"; end; OnEnable: enablenpc "Test Supervisor#jr_04"; - set $@job_rang_point01,0; + $@job_rang_point01 = 0; initnpctimer; end; OnDisable: @@ -849,8 +849,8 @@ OnInit: end; OnEnable: enablenpc "First Test Timer#jr_05"; - set $@job_rang_point01,0; - set $@job_rang_text01,0; + $@job_rang_point01 = 0; + $@job_rang_text01 = 0; setarray .text$[1], "First","Second","Third","Fourth","Fifth","Sixth","Seventh","Eighth","Ninth","Tenth","Eleventh", "Twelfth","Thirteenth","Fourteenth","Fifteenth","Sixteenth","Seventeenth","Eighteenth","Nineteenth","Last"; @@ -903,7 +903,7 @@ OnTimer115000: OnTimer122000: OnTimer129000: OnTimer136000: - set $@job_rang_text01,$@job_rang_text01+1; + ++$@job_rang_text01; mapannounce "job3_rang02","Test Supervisor, Notice : "+.text$[$@job_rang_text01]+" Wave! Kill the Poring!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 donpcevent "CallCorrectAnswer#jr::OnStart"; end; @@ -912,7 +912,7 @@ OnTimer143000: end; OnTimer146000: if ($@job_rang_point01 < 1) - set $@job_rang_point01,0; + $@job_rang_point01 = 0; mapannounce "job3_rang02","Test Supervisor, Notice : I'll announce the test result. The number of Porings you killed out of 20 is ..." + $@job_rang_point01 + "!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 end; OnTimer149000: @@ -936,8 +936,8 @@ OnTimer154000: OnTimer157000: stopnpctimer; mapwarp "job3_rang02","tur_dun01",93,165; - set $@job_rang_point01,0; - set $@job_rang_text01,0; + $@job_rang_point01 = 0; + $@job_rang_text01 = 0; donpcevent "Test Supervisor#jr_04::OnDisable"; donpcevent "Test Waiting Room#jr_03::OnEnable"; donpcevent "First Test Timer#jr_05::OnDisable"; @@ -957,7 +957,7 @@ OnStart: setarray .@x[0],35,44,54,35,54,35,44,54; setarray .@y[0],58,58,58,49,49,39,39,39; setarray .@id[0],1002,1031,1242,1113; - set .@i, rand(8); + .@i = rand(8); donpcevent "CallWrongAnswer#jr::"+.@label$[.@i]; monster "job3_rang02",.@x[.@i],.@y[.@i],"Poring",.@id[rand(4)],1,"CallCorrectAnswer#jr::OnMyMobDead"; end; @@ -966,7 +966,7 @@ OnReset: end; OnMyMobDead: specialeffect2 EF_POTION_CON; - set $@job_rang_point01, $@job_rang_point01+1; + ++$@job_rang_point01; mapannounce "job3_rang02","Test Supervisor, Notice : Correct Target! You have very good eyesight!",bc_map,"0xffb6c1"; //FW_NORMAL 12 0 0 end; } @@ -1056,7 +1056,7 @@ OnReset: end; OnMyMobDead: specialeffect2 EF_DEVIL; - set $@job_rang_point01, $@job_rang_point01-1; + --$@job_rang_point01; mapannounce "job3_rang02","Test Supervisor, Notice : Wrong Target! Pull yourself together!",bc_map,"0xffb6c1"; //FW_NORMAL 12 0 0 end; } @@ -1372,7 +1372,7 @@ OnEnable: end; OnDisable: stopnpctimer; - set $@job_rang_point03,0; + $@job_rang_point03 = 0; disablenpc "Third Test Timer#jr_12"; end; OnTimer3000: @@ -1386,7 +1386,7 @@ OnTimer9000: end; OnTimer12000: mapannounce "job3_rang02","Test Supervisor, Freeze : The 'Egg Bombs' will spawn 20 times! Each time you successfully dismantle one, you get 1 point! If you get 10 or more points, you pass the practical test, so go for it! Then I'll start!!!!!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 - set .n,14; + .n = 14; end; OnTimer15000: OnTimer20000: @@ -1409,14 +1409,14 @@ OnTimer100000: OnTimer105000: OnTimer110000: donpcevent "Egg Bomb#"+(.n+rand(3))+"::OnEnable"; - if (.n == 26) set .n,14; - else set .n,.n+3; + if (.n == 26) .n = 14; + else .n += 3; end; OnTimer113000: mapannounce "job3_rang02","Test Supervisor, Freeze : The test is ooooooooooooooveeeeerrr!!!!!!!!!!!!!!!!!!!!!!!!!!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 - for(set .@i,14; .@i<=28; set .@i,.@i+1) + for(.@i = 14; .@i<=28; ++.@i) donpcevent "Egg Bomb#"+.@i+"::OnDisable"; - set .n,0; + .n = 0; end; OnTimer116000: mapannounce "job3_rang02","Test Supervisor, Freeze : Well let's see the result?!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 @@ -1437,13 +1437,13 @@ OnTimer124000: end; OnTimer127000: mapannounce "job3_rang02","Test Supervisor, Freeze : It's too bad, but you'll need to retake the test from the beginning! Please go back!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 - set $@job_rang_point03,0; + $@job_rang_point03 = 0; mapwarp "job3_rang02","tur_dun01",93,165; donpcevent "Test Supervisor#jr_13::OnDisable"; end; OnTimer130000: stopnpctimer; - set $@job_rang_point03,0; + $@job_rang_point03 = 0; donpcevent "Test Waiting Room#jr_03::OnEnable"; donpcevent "Third Test Timer#jr_12::OnDisable"; end; @@ -1552,7 +1552,7 @@ OnTimer123000: mapannounce "job3_rang02","Test Supervisor, Freeze : You weren't on time for the test, so I am ending the 3rd practical test!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 end; OnTimer127000: - set $@job_rang_point03,0; + $@job_rang_point03 = 0; mapannounce "job3_rang02","Test Supervisor, Freeze : It's too bad, but try again!",bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 mapwarp "job3_rang02","tur_dun01",93,165; end; @@ -1578,9 +1578,9 @@ OnEnable: getmapxy(.@map$,.@x,.@y,1); monster "job3_rang02",.@x,.@y,"Egg Bomb",1047,1,strnpcinfo(0)+"::OnMyMobDead"; switch(atoi(strnpcinfo(2))%3) { - case 0: set .@str$,"Hey, I am going to explode. What are you going to do?"; break; - case 1: set .@str$,"I... no, I can't stand anymore!!"; break; - case 2: set .@str$,"I am almost done now... Don't stop me."; break; + case 0: .@str$ = "Hey, I am going to explode. What are you going to do?"; break; + case 1: .@str$ = "I... no, I can't stand anymore!!"; break; + case 2: .@str$ = "I am almost done now... Don't stop me."; break; } mapannounce "job3_rang02","Egg Bomb : "+.@str$,bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 end; @@ -1590,11 +1590,11 @@ OnDisable: disablenpc strnpcinfo(0); end; OnMyMobDead: - set $@job_rang_point03, $@job_rang_point03+1; + ++$@job_rang_point03; switch(atoi(strnpcinfo(2))%3) { - case 0: set .@str$,"The world is meaningless and my dream is so far away..."; break; - case 1: set .@str$,"Don't be relieved. Misery always comes from carelessness."; break; - case 2: set .@str$,"Alas, it was only a dream for a short time..."; break; + case 0: .@str$ = "The world is meaningless and my dream is so far away..."; break; + case 1: .@str$ = "Don't be relieved. Misery always comes from carelessness."; break; + case 2: .@str$ = "Alas, it was only a dream for a short time..."; break; } mapannounce "job3_rang02","Egg Bomb : "+.@str$,bc_map,"0x87ceeb"; //FW_NORMAL 12 0 0 donpcevent strnpcinfo(0)+"::OnDisable"; @@ -1649,7 +1649,7 @@ job3_rang01,90,43,3 script Ranger Master#jr_29 4_M_REIDIN_KURS,{ mes "Congratulations!"; mes "You've completed all the rough practical tests!"; if (job_ranger01 == 6) { - set job_ranger01,7; + job_ranger01 = 7; changequest 8259,8262; } next; @@ -1729,7 +1729,7 @@ job3_rang01,90,43,3 script Ranger Master#jr_29 4_M_REIDIN_KURS,{ mes "From now on be active as a splendid Ranger!"; mes "I wish you luck in your future!"; delitem 1703,1; //Bow__ - set job_ranger01,8; + job_ranger01 = 8; completequest 8262; jobchange roclass(eaclass()|EAJL_THIRD); getitem 5748,1; //Sniper_Goggle @@ -1798,7 +1798,7 @@ job3_rang01,58,1,0 script Worker#job_ranger 4_M_ORIENT01,{ case 8: mes "3rd Test has been Disabled"; donpcevent "Third Test Timer#jr_12::OnDisable"; - for(set .@i,14; .@i<=28; set .@i,.@i+1) + for(.@i = 14; .@i<=28; ++.@i) donpcevent "Egg Bomb#"+.@i+"::OnDisable"; close; case 9: diff --git a/npc/re/jobs/3-1/rune_knight.txt b/npc/re/jobs/3-1/rune_knight.txt index ceb38a0eb..200d6c965 100644 --- a/npc/re/jobs/3-1/rune_knight.txt +++ b/npc/re/jobs/3-1/rune_knight.txt @@ -80,7 +80,7 @@ prt_in,162,24,3 script Splendid-Looking Knight 4_M_KNIGHT_SILVER,2,2,{ mes "You're sure now?"; mes "Let me send a dispatch to my comrades that you are willing to join our ranks."; next; - set job_rune_edq,1; + job_rune_edq = 1; setquest 3200; mes "[Rune Knight Manuel]"; mes "You know the place called Glast Heim? There's a Rune Knight waiting for you there, he will guide you to the entrance of Glast Heim Tower."; @@ -215,7 +215,7 @@ glast_01,44,363,3 script Guide, Jungberg 4_M_KNIGHT_BLACK,2,2,{ next; mes "[Guide, Jungberg]"; mes "Of course your life might be at risk by the ghosts of Glast Heim... but overcoming the risk shouldn't be hard for a Rune Knight candidate."; - set job_rune_edq,2; + job_rune_edq = 2; changequest 3200,3201; close; case 2: @@ -315,19 +315,19 @@ job3_rune01,80,60,3 script Rune Knight Captain 4_M_KNIGHT_SILVER,2,2,{ mes "[Captain Tigris]"; if (job_rune_edq3 == 0) { mes "Hm... This is perfect. You've come here with very rare good records."; - set .@item,2140; //Energy_Rune_Guard + .@item = 2140; //Energy_Rune_Guard } else if (job_rune_edq3 > 2 && job_rune_edq3 < 6) { mes "Hmm... This is great. You've come here with decent records."; - set .@item,2794; //Magic_Stone_Ring + .@item = 2794; //Magic_Stone_Ring } else { mes "Hmm, not bad. It's not a great record but you tried your best."; - set .@item,15002; //Rune_Plate + .@item = 15002; //Rune_Plate } next; mes "[Captain Tigris]"; mes "Here, take this. It's a gift that I like to give to the younger generation like yourself."; getitem .@item,1; //Energy_Rune_Guard - set job_rune_edq,24; + job_rune_edq = 24; close; } mes "Hey, long time no see, "+strcharinfo(0)+". I don't think you've got any important matters to discuss but make yourself comfortable."; @@ -371,7 +371,7 @@ job3_rune01,80,60,3 script Rune Knight Captain 4_M_KNIGHT_SILVER,2,2,{ mes "[Captain Tigris]"; mes "When the test is done, talk to me. Anyway you'll need to care about the tests progressing with other people."; next; - set job_rune_edq,3; + job_rune_edq = 3; changequest 3201,3202; mes "[Captain Tigris]"; mes "Well then, I'll be waiting here so take the test."; @@ -428,7 +428,7 @@ job3_rune01,80,60,3 script Rune Knight Captain 4_M_KNIGHT_SILVER,2,2,{ next; mes "[Captain Tigris]"; mes "Go to that fiery lady in the library room to get the next test done and come back."; - set job_rune_edq,7; + job_rune_edq = 7; changequest 3204,3205; close; } else if (job_rune_edq > 6 && job_rune_edq < 16) { @@ -466,7 +466,7 @@ job3_rune01,80,60,3 script Rune Knight Captain 4_M_KNIGHT_SILVER,2,2,{ mes "[Captain Tigris]"; mes "I'm not kidding, I am really looking forward to your new start as a Rune Knight."; mes "So please do your best."; - set job_rune_edq,17; + job_rune_edq = 17; changequest 3215,3216; close; } else if (job_rune_edq > 16 && job_rune_edq < 22) { @@ -531,7 +531,7 @@ job3_rune01,80,60,3 script Rune Knight Captain 4_M_KNIGHT_SILVER,2,2,{ next; getitem 5746,1; //Rune_Circlet getitem 2795,1; //Green_Apple_Ring - set job_rune_edq,23; + job_rune_edq = 23; completequest 3219; jobchange roclass(eaclass()|EAJL_THIRD); mes "[Captain Tigris]"; @@ -643,7 +643,7 @@ job3_rune01,90,50,3 script Rune Knight Lunarea 4_M_KNIGHT_GOLD,2,2,{ next; mes "[Rune Knight, Lunarea]"; mes "This portion of the test is over. Go talk to Captain Tigris."; - set job_rune_edq,6; + job_rune_edq = 6; changequest 3203,3204; close; } else if (job_rune_edq > 5) { @@ -661,14 +661,14 @@ L_Test: mes "She nods her head and reaches out her hand lightly. Then she draws her sword and makes a signal."; if ($@job_rune_test1 == 0) { if (getarg(0) == 0) { - set job_rune_edq,4; + job_rune_edq = 4; changequest 3202,3203; setquest 3220; // ? } else if (questprogress(3220)) { erasequest 3220; setquest 3220; } - set $@job_rune_test1,1; + $@job_rune_test1 = 1; close2; warp "job3_rune02",38,40; end; @@ -733,7 +733,7 @@ job3_rune01,55,50,3 script Rune Knight, Renoa 4_M_KNIGHT_GOLD,2,2,{ next; mes "[Rune Knight, Renoa]"; mes "Don't worry, you won't be required to have the same knowledge as the magicians of Geffen or Juno. But you can't be an idiot either."; - set job_rune_edq,8; + job_rune_edq = 8; changequest 3205,3206; close; } else if (job_rune_edq > 7 && job_rune_edq < 11) { @@ -780,8 +780,8 @@ job3_rune01,55,50,3 script Rune Knight, Renoa 4_M_KNIGHT_GOLD,2,2,{ next; mes "[Rune Knight, Renoa]"; mes "If you are ready I'll guide you to the warp that moves you directly to Serpeone. Meet her and get instructions from her."; - set job_rune_edq_book,0; - set job_rune_edq,12; + job_rune_edq_book = 0; + job_rune_edq = 12; changequest 3206,3207; close; } else if (job_rune_edq > 11 && job_rune_edq < 14) { @@ -838,7 +838,7 @@ job3_rune01,55,50,3 script Rune Knight, Renoa 4_M_KNIGHT_GOLD,2,2,{ mes "[Rune Knight, Renoa]"; mes "The total number of rune stones you need to make is 20."; mes "Remember that well."; - set job_rune_edq,15; + job_rune_edq = 15; changequest 3213,3214; close; } else if (job_rune_edq == 15) { @@ -882,7 +882,7 @@ job3_rune01,55,50,3 script Rune Knight, Renoa 4_M_KNIGHT_GOLD,2,2,{ next; mes "[Rune Knight, Renoa]"; mes "Ha! You did a good job considering how difficult my test is. If you were nervous, you can relax now."; - set job_rune_edq,16; + job_rune_edq = 16; if (job_rune_edq2 == 20) changequest 3214,3215; close; @@ -951,7 +951,7 @@ job3_rune01,58,51,1 script Rune Furnace CLEAR_NPC,{ next; mes "[Rune Knight Renoa]"; mes "1 "+.@str$[0]+" rune was created normally."; - set job_rune_edq2, job_rune_edq2+1; + ++job_rune_edq2; close; } if (rand(1,(6 + job_rune_edq3)) == 3) { @@ -960,7 +960,7 @@ job3_rune01,58,51,1 script Rune Furnace CLEAR_NPC,{ next; mes "[Rune Knight Renoa]"; mes "1 "+.@str$[0]+" rune was created normally."; - set job_rune_edq2, job_rune_edq2+1; + ++job_rune_edq2; close; } mes "[Rune Knight Renoa]"; @@ -968,7 +968,7 @@ job3_rune01,58,51,1 script Rune Furnace CLEAR_NPC,{ next; mes "[Rune Knight Renoa]"; mes "Refining the rune stone has failed... Please try again."; - set job_rune_edq3, job_rune_edq3+1; + ++job_rune_edq3; close; } mes "[Rune Knight Renoa]"; @@ -988,7 +988,7 @@ job3_rune01,40,54,1 script Runes and Rune Knights CLEAR_NPC,{ while(1) { switch(select("The birth of Rune Knights:Runes and Magic Energy:Stop Reading")) { case 1: - set .@book1,1; + .@book1 = 1; mes "Rune Knights are the gathering of evolved swordmen who have achieved the harmony of sword and magic."; next; mes "It had been achieved by the legendary swordsman Beljeve who's been known as a Sword Master and a founder of dispensable expenditure."; @@ -1013,7 +1013,7 @@ job3_rune01,40,54,1 script Runes and Rune Knights CLEAR_NPC,{ next; break; case 2: - set .@book2,1; + .@book2 = 1; mes "A jewel called as a Rune is a medium that contains the formless existence, the magical power and the essence of it can be used directly."; next; mes "The Laphine Sage, Serpeone and the founder of Rune Knights Beljeve co-researched runes and the result of their research has only recently become to be known to the world."; @@ -1027,8 +1027,8 @@ job3_rune01,40,54,1 script Runes and Rune Knights CLEAR_NPC,{ break; case 3: if (.@book1 && .@book2 && job_rune_edq < 11 && (job_rune_edq_book & 1) == 0) { - set job_rune_edq_book, job_rune_edq_book | 1; - set job_rune_edq, job_rune_edq+1; + job_rune_edq_book |= 1; + ++job_rune_edq; } close; } @@ -1047,7 +1047,7 @@ job3_rune01,43,44,1 script The Principles of Runes CLEAR_NPC,{ while(1) { switch(select("The principle use of Runes:The types of Runes:Stop Reading")) { case 1: - set .@book1,1; + .@book1 = 1; mes "A rune is a kind of symbol that's been used on the Rune-Midgard continent since ancient times. Up until now it has only been used by occult circles."; next; mes "Runes are used as a symbol system, however, by the story handed down orally, it's known to be used for fortune-telling or used to draw out the human sub consciousness."; @@ -1058,7 +1058,7 @@ job3_rune01,43,44,1 script The Principles of Runes CLEAR_NPC,{ next; break; case 2: - set .@book2,1; + .@book2 = 1; mes "The runes are created from a a total of 25 small stones and they are very fragile to physical shock. So they require special care when being handled."; next; mes "The 25 stones have different meanings and among these, 14 when counter-positioned can have entirely different power and meaning from the original so it's essential to study the exceptional aspects."; @@ -1074,8 +1074,8 @@ job3_rune01,43,44,1 script The Principles of Runes CLEAR_NPC,{ break; case 3: if (.@book1 && .@book2 && job_rune_edq < 11 && (job_rune_edq_book & 2) == 0) { - set job_rune_edq_book, job_rune_edq_book | 2; - set job_rune_edq, job_rune_edq+1; + job_rune_edq_book |= 2; + ++job_rune_edq; } close; } @@ -1094,7 +1094,7 @@ job3_rune01,50,36,1 script Runes, Make & Use CLEAR_NPC,{ while(1) { switch(select("The Making of Rune Stones:Rune Stone Ability Details:Stop Reading")) { case 1: - set .@book1,1; + .@book1 = 1; mes "The making of Rune stones is achieved through a skill called rune mastery which is learned when one becomes a Rune Knight."; next; mes "Rune Mastery is like a code that's been put into the body as a mark of a Rune Knight."; @@ -1109,7 +1109,7 @@ job3_rune01,50,36,1 script Runes, Make & Use CLEAR_NPC,{ next; break; case 2: - set .@book2,1; + .@book2 = 1; switch(select("Chapter One:Chapter Two:Chapter Three:Chapter Four:Stop Reading")) { case 1: mes "Ehwaz - This rune means the enhancement of luck and positive power. It shapes the source in the form of a red spiral in a Rune Furnace."; @@ -1173,8 +1173,8 @@ job3_rune01,50,36,1 script Runes, Make & Use CLEAR_NPC,{ break; case 3: if (.@book1 && .@book2 && job_rune_edq < 11 && (job_rune_edq_book & 4) == 0) { - set job_rune_edq_book, job_rune_edq_book | 4; - set job_rune_edq, job_rune_edq+1; + job_rune_edq_book |= 4; + ++job_rune_edq; } close; } @@ -1331,7 +1331,7 @@ mid_camp,235,250,3 script Sage Serpeone 4_F_FAIRY,2,2,{ next; mes "[Sage Serpeone]"; mes "If you have any problems or any questions, please talk to me."; - set job_rune_edq,13; + job_rune_edq = 13; changequest 3207,3208; setquest 3209; setquest 3210; @@ -1358,7 +1358,7 @@ mid_camp,235,250,3 script Sage Serpeone 4_F_FAIRY,2,2,{ next; mes "[Sage Serpeone]"; mes "If you have any business here, I'll send you to the Rune Knight gathering place. If you are ready, please tell me."; - set job_rune_edq,14; + job_rune_edq = 14; changequest 3208,3213; completequest 3209; completequest 3210; @@ -1465,14 +1465,14 @@ job3_rune01,114,50,3 script Rune Knight Velpino 4_M_KNIGHT_BLACK,{ next; mes "[Rune Knight Velpino]"; mes "If you are ready just talk to me again."; - set job_rune_edq,18; + job_rune_edq = 18; changequest 3216,3217; close; } else if (job_rune_edq > 17 && job_rune_edq < 21) { if (countitem(12388)+countitem(12389)+countitem(12390) == 0) { mes "[Rune Knight Velpino]"; mes "If all of your preparations are done, I'll send you to the final test field."; - set job_rune_edq,18; + job_rune_edq = 18; next; if(select("Enter the final test field.:I'm not ready yet.") == 2) close; if (getequipisequiped(EQI_HEAD_TOP) || getequipisequiped(EQI_ARMOR) || getequipisequiped(EQI_GARMENT) || getequipisequiped(EQI_SHOES) || @@ -1491,7 +1491,7 @@ job3_rune01,114,50,3 script Rune Knight Velpino 4_M_KNIGHT_BLACK,{ } if ($@job_rune_test1 == 0) { if (Weight < 4001) { - set $@job_rune_test1,1; + $@job_rune_test1 = 1; sc_start SC_INCINT,300000,40; getitem 12389,30; //Runstone_Storm getitem 12390,30; //Runstone_Millennium @@ -1535,7 +1535,7 @@ job3_rune01,114,50,3 script Rune Knight Velpino 4_M_KNIGHT_BLACK,{ mes "[Rune Knight Velpino]"; mes "Congratulations!"; mes "Well I'd better go now for the remaining candidates."; - set job_rune_edq,22; + job_rune_edq = 22; changequest 3218,3219; close; } @@ -1580,8 +1580,8 @@ OnTouch: donpcevent "job_rune_edq#1st_tcnc::OnDisable"; donpcevent "job_rune_edq#3rd_tb::OnDisable"; donpcevent "job_rune_edq#3rd_tc::OnDisable"; - set $@job_rune_test1,0; - set $@job_rune_test2,0; + $@job_rune_test1 = 0; + $@job_rune_test2 = 0; donpcevent "#RK Test Hidden Portal 1::OnEnable"; mapwarp "job3_rune02","job3_rune01",80,65; end; @@ -1647,8 +1647,8 @@ OnTimer305000: donpcevent "job_rune_edq#3rd_tc::OnDisable"; donpcevent "#RK Test Hidden Portal 1::OnEnable"; mapwarp "job3_rune02","job3_rune01",80,65; - set $@job_rune_test1,0; - set $@job_rune_test2,0; + $@job_rune_test1 = 0; + $@job_rune_test2 = 0; stopnpctimer; end; } @@ -1738,7 +1738,7 @@ OnDisable: end; OnMyMobDead: if (mobcount("job3_rune02","job_rune_edq#1st_tcmc2::OnMyMobDead") < 1) { - set job_rune_edq,5; + job_rune_edq = 5; erasequest 3220; killmonster "job3_rune02","job_rune_edq#1st_tcmc2::OnMyMobDead"; mapannounce "job3_rune02","Congratulations. You've passed the first test.",bc_map,"0xFFFF00"; //FW_NORMAL 12 0 0 @@ -1749,8 +1749,8 @@ OnMyMobDead: donpcevent "job_rune_edq#1st_tcmc::OnDisable"; donpcevent "job_rune_edq#1st_tcmc2::OnDisable"; donpcevent "#RK Test Hidden Portal 1::OnEnable"; - set $@job_rune_test1,0; - set $@job_rune_test2,0; + $@job_rune_test1 = 0; + $@job_rune_test2 = 0; end; } end; @@ -1767,7 +1767,7 @@ OnEnable: end; OnDisable: stopnpctimer; - set $@job_rune_test2,0; + $@job_rune_test2 = 0; donpcevent "Captain Tigris#jrt1::OnDisable"; donpcevent "Rune Knight Lunarea#jrt1::OnDisable"; donpcevent "Rune Knight Renoa#jrt1::OnDisable"; @@ -1777,7 +1777,7 @@ OnDisable: OnUse: mapannounce "job3_rune02","Captain Tigris : Gentlemen, let's watch the test for a while.",bc_map,"0xFFFF00"; //FW_NORMAL 12 0 0 stopnpctimer; - set $@job_rune_test2,0; + $@job_rune_test2 = 0; donpcevent "Captain Tigris#jrt1::OnDisable"; donpcevent "Rune Knight Lunarea#jrt1::OnDisable"; donpcevent "Rune Knight Renoa#jrt1::OnDisable"; @@ -1831,7 +1831,7 @@ job3_rune02,34,46,5 script Captain Tigris#jrt1 4_M_KNIGHT_SILVER,2,2,{ sc_start SC_BLOODING,10000,0; break; } - set $@job_rune_test2,1; + $@job_rune_test2 = 1; initnpctimer; end; OnInit: @@ -1843,7 +1843,7 @@ OnEnable: end; OnTimer5000: donpcevent "job_rune_edq#1st_tcnc::OnUse"; - set $@job_rune_test2,0; + $@job_rune_test2 = 0; stopnpctimer; end; } @@ -1876,7 +1876,7 @@ job3_rune02,43,46,3 script Rune Knight Lunarea#jrt1 4_M_KNIGHT_GOLD,2,2,{ sc_start SC_CURSE,30000,0; break; } - set $@job_rune_test2,1; + $@job_rune_test2 = 1; initnpctimer; end; OnInit: @@ -1888,7 +1888,7 @@ OnEnable: end; OnTimer5000: donpcevent "job_rune_edq#1st_tcnc::OnUse"; - set $@job_rune_test2,0; + $@job_rune_test2 = 0; stopnpctimer; end; } @@ -1922,7 +1922,7 @@ job3_rune02,43,34,1 script Rune Knight Renoa#jrt1 4_M_KNIGHT_GOLD,2,2,{ sc_start SC_CURSE,30000,0; break; } - set $@job_rune_test2,1; + $@job_rune_test2 = 1; initnpctimer; end; OnInit: @@ -1933,7 +1933,7 @@ OnEnable: enablenpc "Rune Knight Renoa#jrt1"; end; OnTimer5000: - set $@job_rune_test2,0; + $@job_rune_test2 = 0; donpcevent "job_rune_edq#1st_tcnc::OnUse"; stopnpctimer; end; @@ -1967,7 +1967,7 @@ job3_rune02,34,34,7 script Rune Knight Velpino#jrt1 4_M_KNIGHT_BLACK,2,2,{ sc_start SC_SLEEP,10000,0; break; } - set $@job_rune_test2,1; + $@job_rune_test2 = 1; initnpctimer; end; OnInit: @@ -1978,7 +1978,7 @@ OnEnable: enablenpc "Rune Knight Velpino#jrt1"; end; OnTimer5000: - set $@job_rune_test2,0; + $@job_rune_test2 = 0; donpcevent "job_rune_edq#1st_tcnc::OnUse"; stopnpctimer; end; @@ -2044,8 +2044,8 @@ OnTimer482000: donpcevent "job_rune_edq#3rd_tb::OnDisable"; donpcevent "job_rune_edq#3rd_tc::OnDisable"; donpcevent "#RK Test Hidden Portal 1::OnEnable"; - set $@job_rune_test1,0; - set $@job_rune_test2,0; + $@job_rune_test1 = 0; + $@job_rune_test2 = 0; stopnpctimer; end; } @@ -2065,7 +2065,7 @@ OnDisable: end; OnMyMobDead: if (mobcount("job3_rune02","job_rune_edq#3rd_tc1::OnMyMobDead") < 1) { - set job_rune_edq,19; + job_rune_edq = 19; killmonster "job3_rune02","job_rune_edq#3rd_tc1::OnMyMobDead"; donpcevent "job_rune_edq#3rd_tc2::OnEnable"; donpcevent "job_rune_edq#3rd_tc1::OnDisable"; @@ -2089,7 +2089,7 @@ OnDisable: end; OnMyMobDead: if (mobcount("job3_rune02","job_rune_edq#3rd_tc2::OnMyMobDead") < 1) { - set job_rune_edq,20; + job_rune_edq = 20; killmonster "job3_rune02","job_rune_edq#3rd_tc2::OnMyMobDead"; donpcevent "job_rune_edq#3rd_tc3::OnEnable"; donpcevent "job_rune_edq#3rd_tc2::OnDisable"; @@ -2113,7 +2113,7 @@ OnDisable: end; OnMyMobDead: if (mobcount("job3_rune02","job_rune_edq#3rd_tc3::OnMyMobDead") < 1) { - set job_rune_edq,21; + job_rune_edq = 21; changequest 3217,3218; erasequest 3220; killmonster "job3_rune02","job_rune_edq#3rd_tc3::OnMyMobDead"; @@ -2127,8 +2127,8 @@ OnMyMobDead: donpcevent "job_rune_edq#3rd_tb::OnDisable"; donpcevent "job_rune_edq#3rd_tc::OnDisable"; donpcevent "#RK Test Hidden Portal 1::OnEnable"; - set $@job_rune_test1,0; - set $@job_rune_test2,0; + $@job_rune_test1 = 0; + $@job_rune_test2 = 0; end; } end; @@ -2147,7 +2147,7 @@ sec_in02,34,167,3 script R.Knight Job Manager 4_M_KNIGHT_SILVER,1,1,{ mes "The number of Rune Knight Test field right now is... " + getmapusers("job3_rune02") + "."; close; case 2: - set $@job_rune_test1,0; + $@job_rune_test1 = 0; mes "Rune Knight Job Change GlobalVar is modified to 0. The use of the test field is now available."; close; } diff --git a/npc/re/jobs/3-1/warlock.txt b/npc/re/jobs/3-1/warlock.txt index 973dc915f..3445055c0 100644 --- a/npc/re/jobs/3-1/warlock.txt +++ b/npc/re/jobs/3-1/warlock.txt @@ -182,14 +182,14 @@ function script F_Warlock { mes "[Master Egnoloria]"; mes "Talk to the guy with the weird hair."; mes "He'll let you know what you should do."; - set job_wl,2; + job_wl = 2; setquest 11106; close; case 2: mes "[Master Egnoloria]"; mes "Good."; mes "You are a human being so that's for you."; - set job_wl,1; + job_wl = 1; close2; warp "splendide",200,100; end; @@ -250,7 +250,7 @@ spl_in02,77,107,5 script Assistant#Warlock1 4_M_FAIRYKID5,{ } if (SkillPoint != 0) { mes "First, use all of your remaining job skill points before continuing."; - set job_wl,3; + job_wl = 3; close; } mes "This is the Master's"; @@ -303,7 +303,7 @@ L_Quest: if (getarg(0)) { mes "[Yoop]"; mes "Show us how strong you are. And don't forget to wear this."; - set job_wl,4; + job_wl = 4; getitem 2796,1; //Magical_Stone getitem 2797,1; //Magical_Stone_ changequest 11106,11107; @@ -373,7 +373,7 @@ spl_in02,60,231,5 script Yoop#Warlock 4_M_FAIRYKID5,{ delitem 2797,countitem(2797); //Magical_Stone_ delitem 6152,countitem(6152); //Glittering_Crystal delitem 6151,countitem(6151); //Peice_Of_Great_Bradium - set job_wl,5; + job_wl = 5; changequest 11107,11108; close; } @@ -479,7 +479,7 @@ spl_in02,84,103,3 script Assistant#Warlock2 4_F_FAIRYKID4,{ next; mes "[Yoop]"; mes "I will guide you into the magic room."; - set job_wl,7; + job_wl = 7; changequest 11109,11110; getitem 12384,5; //Rainbow_Ruby_Water getitem 12386,5; //Rainbow_Ruby_Wind @@ -521,7 +521,7 @@ spl_in02,84,103,3 script Assistant#Warlock2 4_F_FAIRYKID4,{ mes "[Yoop]"; mes "All of the tests are done. Now talk to Master Engoloria."; mes "I'm so happy that you have succeeded."; - set job_wl,9; + job_wl = 9; changequest 11111,11112; close; } else if (job_wl == 9) { @@ -600,7 +600,7 @@ spl_in02,80,108,5 script Guild Master#Warlock 4_F_FAIRY1,{ mes "[Master Egnoloria]"; mes "Talk to the guy with the weird hair."; mes "He'll let you know what you should do."; - set job_wl,2; + job_wl = 2; setquest 11106; close; case 2: @@ -645,7 +645,7 @@ spl_in02,80,108,5 script Guild Master#Warlock 4_F_FAIRY1,{ mes "Yup, Master."; mes "Please follow me."; emotion e_ic,0,"Assistant#Warlock2"; - set job_wl,6; + job_wl = 6; changequest 11108,11109; close; } else if (job_wl < 9) { @@ -692,11 +692,11 @@ spl_in02,80,108,5 script Guild Master#Warlock 4_F_FAIRY1,{ mes "[Master Egnoloria]"; mes "This crystallized magical stone will keep you safe."; if (Class == Job_High_Wizard) { - if (JobLevel > 69) set job_wl,13; - else if (JobLevel > 59) set job_wl,12; - else set job_wl,11; + if (JobLevel > 69) job_wl = 13; + else if (JobLevel > 59) job_wl = 12; + else job_wl = 11; } - else set job_wl,10; + else job_wl = 10; jobchange roclass(eaclass()|EAJL_THIRD); completequest 11112; getitem 5753,1; //Magic_Stone_Hat @@ -809,7 +809,7 @@ OnMyMobDead: if (mobcount("job3_war02",strnpcinfo(0)+"::OnMyMobDead") < 1) { stopnpctimer; mapannounce "job3_war02","The Monster Invasion has been stopped.",bc_map; - set .@str$, "The chamber of magic#"+((strnpcinfo(0) == "The chamber of magic#2")?"3":"4"); + .@str$ = "The chamber of magic#"+((strnpcinfo(0) == "The chamber of magic#2")?"3":"4"); donpcevent .@str$+"::OnEnable"; } end; @@ -952,7 +952,7 @@ OnDisable: OnMyMobDead: if (mobcount("job3_war02","Hollow Stone#Warlock::OnMyMobDead") < 1) { mapannounce "job3_war02","The Hollow Stone is crystallized with enough magic power.",bc_map; - set job_wl,8; + job_wl = 8; changequest 11110,11111; donpcevent "Hollow Stone#Warlock::OnReset"; donpcevent "Hollow Stone#Warlock::OnDisable"; diff --git a/npc/re/jobs/3-2/genetic.txt b/npc/re/jobs/3-2/genetic.txt index caf2f428d..809d5ff65 100644 --- a/npc/re/jobs/3-2/genetic.txt +++ b/npc/re/jobs/3-2/genetic.txt @@ -56,7 +56,7 @@ alde_alche,35,186,5 script Alchemist Union Member 1_M_SIGNALCHE,{ next; mes "[Alchemist Union Member]"; mes "You can find her in the Alchemy Lab at the western part of Lighthalzen. There is also another Geneticist studying weaponry there, you might want to pay her a visit as well."; - set job_gen,1; + job_gen = 1; setquest 2215; close; case 2: @@ -187,7 +187,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ next; mes "- For now it seems that I -"; mes "- need to calm down Devries. -"; - set job_gen,2; + job_gen = 2; close; } else if (job_gen == 2) { mes "[Devries]"; @@ -281,13 +281,13 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "Alright."; mes "Even though your knowledge is not that great as that of Geneticists, a fundamental knowledge is also important."; mes "Popo, come back to me once you've finished your studies."; - set job_gen,4; + job_gen = 4; close; case 2: mes "[Devries]"; mes "Good!"; mes "Let's do it!"; - set job_gen,5; + job_gen = 5; close; } } else if (job_gen == 4) { @@ -304,7 +304,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "[Devries]"; mes "Very good!"; mes "Let's do it!"; - set job_gen,5; + job_gen = 5; close; } } else if (job_gen == 5) { @@ -365,7 +365,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ next; mes "[Devries]"; mes "Well, you better get started!"; - set job_gen,6; + job_gen = 6; close; } else if (job_gen == 6) { mes "[Devries]"; @@ -389,7 +389,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "[Devries]"; mes "You can start from the beginning then?"; mes "Why are you asking me such things?"; - set job_gen,7; + job_gen = 7; if (questprogress(2209) == 1) erasequest 2209; if (questprogress(2210) == 1) erasequest 2210; if (questprogress(2211) == 1) erasequest 2211; @@ -416,7 +416,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "What happened?"; mes "How could you say the study is completed without any result?"; mes "Start again."; - set job_gen,7; + job_gen = 7; } else { mes "[Devries]"; mes "Well, I'll take a look at the seeds Popo made."; @@ -460,7 +460,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "Go take a look at her experiment results."; mes "Could you give this message to her? Tell her to conduct her experiments quietly."; delitem 6273,1; //Altered_Seed - set job_gen,62; + job_gen = 62; changequest 2215,2216; } else { specialeffect EF_SPELLBREAKER,AREA,"Super Cultivator#gen"; @@ -470,7 +470,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "It didn't grow at all, it's withered already."; mes "Go and start over!"; delitem 6272,1; //Experiment_Seed - set job_gen,7; + job_gen = 7; } } if (questprogress(2209) == 1) erasequest 2209; @@ -485,7 +485,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "[Devries]"; mes "Oh, wait a second."; mes "It seems that the mail's has arrived."; - set job_gen,76; + job_gen = 76; completequest 2223; close; } @@ -555,7 +555,7 @@ job3_gen01,25,58,3 script Devries#gen 4_LGTSCIENCE,{ mes "Congratulations, Popo!"; mes "You are a Geneticist from now on!!"; jobchange roclass(eaclass()|EAJL_THIRD); - set job_gen,77; + job_gen = 77; getitem 5752,1; //Midas_Whisper getitem 2795,1; //Green_Apple_Ring next; @@ -584,7 +584,7 @@ job3_gen01,83,72,3 script Delivery Box#generic HIDDEN_NPC,{ switch(select("Take out a cookie bag.:Do nothing.")) { case 1: mes "- You've taken out a cookie bag out of the box. -"; - set job_gen,3; + job_gen = 3; close; case 2: mes "You do nothing."; @@ -622,7 +622,7 @@ job3_gen01,12,56,3 script Plant Guide#generic HIDDEN_NPC,{ next; mes "...The plants usually used for Alchemy are Bigibigi Grass and Muka Trees that have sharp thorns but are delicate inside and Bogi Creeper whose growth speed is really fast but parasitic on living things."; if (job_gen == 6) - set job_gen,7; + job_gen = 7; close; case 3: mes "...Using minerals in Alchemy is a way that beginners find pretty easy."; @@ -647,7 +647,7 @@ function script Genetic_Job_Plant { next; switch(select("Use it as a material.:Do not use.")) { case 1: - if (getarg(3,0)) set .@str$,"some of the "; + if (getarg(3, 0)) .@str$ = "some of the "; mes "- You've acquired "+.@str$+getarg(1)+". -"; setquest getarg(0); close; @@ -728,26 +728,26 @@ job3_gen01,7,50,3 script Testing Table#gen CLEAR_NPC,{ mes "["+strcharinfo(0)+"]"; mes "Good. Now I can let Miss Devries take a look at this seed!"; if (!questprogress(2209) && !questprogress(2210) && !questprogress(2211)) { - set job_gen,61; + job_gen = 61; getitem 6272,1; //Experiment_Seed close; } - if (questprogress(2209) == 1) set job_gen,job_gen+10; - if (questprogress(2210) == 1) set job_gen,job_gen+10; - if (questprogress(2211) == 1) set job_gen,job_gen+10; - set .@score, job_gen + JobLevel - 20; + if (questprogress(2209) == 1) job_gen += 10; + if (questprogress(2210) == 1) job_gen += 10; + if (questprogress(2211) == 1) job_gen += 10; + .@score = job_gen + JobLevel - 20; if (rand(1,100) < .@score) { - set job_gen,60; + job_gen = 60; getitem 6273,1; //Altered_Seed close; } else { - set job_gen,61; + job_gen = 61; getitem 6272,1; //Experiment_Seed close; } } else if (job_gen > 7 && job_gen < 60) { mes "- It looks like the experiment has failed. I better start over. -"; - set job_gen,7; + job_gen = 7; if (countitem(6273)) delitem 6273,1; //Altered_Seed if (countitem(6272)) delitem 6272,1; //Experiment_Seed if (questprogress(2209) == 1) erasequest 2209; @@ -800,7 +800,7 @@ job3_gen01,91,48,3 script Demi Calberine#gen 4_F_SCIENCE,{ mes "Ugh~ I think they dropped around here somewhere."; mes "I only need 10! I need to put the other parts together first... Please could you help me?!"; changequest 2216,2217; - set job_gen,63; + job_gen = 63; close; } else if (job_gen > 62 && job_gen < 74) { mes "Ah, oh no, oh no~~~"; @@ -908,7 +908,7 @@ job3_gen01,91,48,3 script Demi Calberine#gen 4_F_SCIENCE,{ mes "- Rattle -"; next; mes "- What's this? I feel like the floor is missing somewhere. -"; - set job_gen,75; + job_gen = 75; changequest 2217,2223; close2; warp "job3_gen01",23,32; @@ -946,7 +946,7 @@ job3_gen01,91,48,3 script Demi Calberine#gen 4_F_SCIENCE,{ mes "- There are so many scattered things on the floor that the lab is in chaos. -"; next; mes "- You found a little metal fragment. -"; - set job_gen, job_gen+1; + job_gen = job_gen+1; specialeffect EF_BASH; disablenpc strnpcinfo(0); initnpctimer; diff --git a/npc/re/jobs/3-2/minstrel.txt b/npc/re/jobs/3-2/minstrel.txt index be017920e..fee20e8d3 100644 --- a/npc/re/jobs/3-2/minstrel.txt +++ b/npc/re/jobs/3-2/minstrel.txt @@ -116,7 +116,7 @@ alberta,196,133,4 script Bard#job_min 4_M_BARD,{ } mes "["+strcharinfo(0)+"]"; mes "Ok, I will."; - set job_min,1; + job_min = 1; setquest 11135; next; mes "[Karian]"; @@ -181,7 +181,7 @@ alberta,196,133,4 script Bard#job_min 4_M_BARD,{ mes "[Karian]"; mes "Um.."; mes "Anyway let's meet at the airship in Izlude."; - set job_min,5; + job_min = 5; changequest 11138,11139; close; } else if (job_min == 100) { @@ -253,7 +253,7 @@ prontera,141,97,4 script Warmhearted woman 4_F_GODEMOM,{ next; mes "[Warmhearted woman]"; mes "He must know something about making that book."; - set job_min,2; + job_min = 2; changequest 11135,11136; close; } else if (job_min == 2) { @@ -285,7 +285,7 @@ prontera,140,331,6 script Glasses-wearing Man 4_M_ALCHE_D,{ next; mes "[Glasses-wearing Man]"; mes "It would be better to ask the ^f57d7dwoman standing in front of the tool shop^000000."; - set job_min,3; + job_min = 3; changequest 11136,11137; close; } else if (job_min == 3) { @@ -325,7 +325,7 @@ prontera,146,218,4 script Woman#job_min 4_F_01,{ mes "- useful information. -"; mes "- I'll go back to Alberta -"; mes "- and talk to that Bard. -"; - set job_min,4; + job_min = 4; changequest 11137,11138; close; } else if (job_min == 4) { @@ -351,7 +351,7 @@ airplane,222,67,6 script Karian#job_min1 4_M_BARD,{ mes "[Karian]"; mes "Acchh..."; if (job_min == 5) { - set job_min,6; + job_min = 6; changequest 11139,11140; close2; warp "hu_in01",267,8; @@ -386,7 +386,7 @@ hu_in01,267,5,3 script Karian#job_min2 4_M_BARD,{ next; mes "[Karian]"; mes "..."; - set job_min,7; + job_min = 7; changequest 11140,11141; close; } else if (job_min == 7) { @@ -471,7 +471,7 @@ hu_in01,267,5,3 script Karian#job_min2 4_M_BARD,{ next; mes "[Karian]"; mes "Did he? I must go there!"; - set job_min,10; + job_min = 10; changequest 11142,11143; close; } else if (job_min == 10) { @@ -605,7 +605,7 @@ hu_in01,361,103,3 script Tone-deaf person 4_M_CASMAN1,{ mes "[Tone-deaf person]"; mes "Rummaging rummaging."; mes "Browsing browsing ."; - set job_min,8; + job_min = 8; close; } else if (job_min == 8) { mes "[Tone-deaf person]"; @@ -666,7 +666,7 @@ hu_in01,361,103,3 script Tone-deaf person 4_M_CASMAN1,{ mes "Ok see you later."; mes "If you want to hear my song, you can visit me."; mes "Hahahh"; - set job_min,9; + job_min = 9; changequest 11141,11142; close; } else if (job_min == 9) { @@ -738,7 +738,7 @@ OnTouch: mes "Juno's store..."; mes "Let's go to Juno..."; if (job_min == 10) { - set job_min,11; + job_min = 11; changequest 11143,11144; } donpcevent "Karian#cmd1::OnDisable"; @@ -926,7 +926,7 @@ yuno,143,170,6 script Mr. Click#job_min 4_M_ALCHE_A,{ mes "Ok. Then let's meet at Lighthalzen's hotel."; mes "I'll get the 33 Teddy Bears."; donpcevent "Karian#cmd2::OnDisable"; - set job_min,12; + job_min = 12; getitem 6270,1; //Mins_Picture changequest 11144,11145; close; @@ -1057,7 +1057,7 @@ OnTouch: mes "Waaah!!!!!!!!!"; mes "I'm so happy!!!"; mes "Thank you, "+strcharinfo(0)+"."; - set job_min,13; + job_min = 13; changequest 11145,11146; donpcevent "Karian#cmd3::OnDisable"; close; @@ -1208,7 +1208,7 @@ OnTouch: if (job_min == 13) { mes "-on the leaves-"; percentheal -90,0; - set job_min,14; + job_min = 14; changequest 11146,11147; close2; warp "ra_in01",361,129; @@ -1226,7 +1226,7 @@ OnTouch: next; mes "["+strcharinfo(0)+"]"; mes "Where am I...?"; - set job_min,15; + job_min = 15; close; } end; @@ -1240,7 +1240,7 @@ ra_in01,358,130,4 script Old Woman#job_min 4_F_CAVE1,{ next; mes "["+strcharinfo(0)+"]"; mes "Where am I...?"; - set job_min,15; + job_min = 15; close; } else if (job_min == 15) { mes "You're in Rachel."; @@ -1308,7 +1308,7 @@ ra_in01,358,130,4 script Old Woman#job_min 4_F_CAVE1,{ mes "We don't have a proper boat."; mes "In southern of Veins, there is a port. If you are lucky you can take it..."; donpcevent "Karian#cmd4::OnDisable"; - set job_min,16; + job_min = 16; changequest 11147,11148; close; } else if (job_min == 16) { @@ -1443,7 +1443,7 @@ function Choice; mes "-I've escaped from the-"; mes "-throes of death a-"; mes "-countless amount of times.-"; - set job_min,17; + job_min = 17; changequest 11148,11149; close2; warp "comodo",184,108; @@ -1455,7 +1455,7 @@ function Choice; close; function Choice { - set .@i$, getarg(select(getarg(0),getarg(1),getarg(2))-1); + .@i$ = getarg(select(getarg(0),getarg(1),getarg(2))-1); mes "[Karian]"; if (.@i$ == "Throw the water out.") { mes "I'll row and you just throw the water out!!"; @@ -1501,7 +1501,7 @@ OnTouch: mes "Oh yeah..."; mes "Why don't we ask the villagers?"; donpcevent "Karian#cmd6::OnDisable"; - set job_min,18; + job_min = 18; changequest 11149,11150; close; } @@ -1522,7 +1522,7 @@ comodo,192,119,0 script Kayak Master#job_min 4W_M_02,{ mes "[Kayak Master]"; mes "The hostess is good at memorizing the faces of customers."; mes "It's good for business you know?"; - set job_min,19; + job_min = 19; changequest 11150,11151; close; } @@ -1558,7 +1558,7 @@ comodo,159,316,4 script Woman Roasting Meat 4_F_GODEMOM,{ next; mes "[Woman Roasting Meat]"; mes "He raised our income a lot while he was here..."; - set job_min,20; + job_min = 20; changequest 11151,11152; close; } else if (job_min == 20) { @@ -1646,7 +1646,7 @@ OnTouch: } mes "Hey! Let's go~~"; donpcevent "Karian#cmd7::OnDisable"; - set job_min,21; + job_min = 21; changequest 11152,11153; close; } @@ -1703,7 +1703,7 @@ OnTouch: next; mes "[Karian]"; mes "I can't get rid of the the memories that I was impressed with when I entered Prontera's gates."; - set job_min,22; + job_min = 22; changequest 11153,11154; donpcevent "Karian#cmd8::OnDisable"; close; @@ -1730,7 +1730,7 @@ OnTouch: mes "I'm so tired."; mes "I want to take a rest~"; mes "Come here, "+strcharinfo(0)+"."; - set job_min,23; + job_min = 23; close; } end; @@ -1740,7 +1740,7 @@ prontera,155,42,0 script #prtjm1 HIDDEN_WARP_NPC,1,1,{ OnTouch: if (job_min == 23) { mes "-Let me go back to my hometown.-"; - set job_min,24; + job_min = 24; close2; warp "prontera",155,44; end; @@ -1752,7 +1752,7 @@ prontera,155,44,0 script #prtjm2 HIDDEN_WARP_NPC,1,1,{ OnTouch: if (job_min == 24) { mes "-There are many beautiful flowers.-"; - set job_min,25; + job_min = 25; close2; warp "prontera",155,46; end; @@ -1764,7 +1764,7 @@ prontera,155,46,0 script #prtjm3 HIDDEN_WARP_NPC,1,1,{ OnTouch: if (job_min == 25) { mes "-The birds sing for me.-"; - set job_min,26; + job_min = 26; close2; warp "prontera",155,48; end; @@ -1813,7 +1813,7 @@ OnTouch: mes "[Karian]"; mes "Why are you looking at me?"; mes "How was it? Have fun??"; - set job_min,27; + job_min = 27; donpcevent "Karian#cmd9::OnDisable"; close2; warp "prt_in",101,174; @@ -1874,7 +1874,7 @@ prt_in,94,172,4 script Karian#job_min3 4_M_MINSTREL1,{ next; mes "[Maestro Song]"; mes "You are also my friend."; - set job_min,100; + job_min = 100; jobchange roclass(eaclass()|EAJL_THIRD); completequest 11154; getitem 5751,1; //Minstrel_Song_Hat diff --git a/npc/re/jobs/3-2/royal_guard.txt b/npc/re/jobs/3-2/royal_guard.txt index c8c0346eb..b8679cd4d 100644 --- a/npc/re/jobs/3-2/royal_guard.txt +++ b/npc/re/jobs/3-2/royal_guard.txt @@ -112,7 +112,7 @@ prt_castle,48,161,3 script Middle-aged Gentleman#rg 1_M_LIBRARYMASTER,{ next; mes "[Heinrich]"; mes "It's not a simple story to tell a person like you. Go back."; - set job_royal,1; + job_royal = 1; setquest 12090; close; case 2: @@ -187,7 +187,7 @@ prt_castle,48,161,3 script Middle-aged Gentleman#rg 1_M_LIBRARYMASTER,{ next; mes "[Heinrich]"; mes "Don't forget to bring the 100 Burning Hearts."; - set job_royal,2; + job_royal = 2; changequest 12090,12091; close; } else if (job_royal == 2) { @@ -201,7 +201,7 @@ prt_castle,48,161,3 script Middle-aged Gentleman#rg 1_M_LIBRARYMASTER,{ mes "[Heinrich]"; mes "Wait while I arrange the stuff that you brought."; delitem 7097,100; //Burning_Heart - set job_royal,3; + job_royal = 3; changequest 12091,12092; close; } else if (job_royal == 3) { @@ -275,7 +275,7 @@ prt_castle,48,161,3 script Middle-aged Gentleman#rg 1_M_LIBRARYMASTER,{ mes "I don't know if it will be helpful or not. I will write an explanation in detail."; next; mes "^000099Here's the last trace of the Royal Guard. Open the quest window and check the position.^000000"; - set job_royal,4; + job_royal = 4; changequest 12092,12093; close; } else if (job_royal == 4) { @@ -319,7 +319,7 @@ prt_castle,48,161,3 script Middle-aged Gentleman#rg 1_M_LIBRARYMASTER,{ mes "I'll be deciphering the cloth for now so I will be very busy!"; delitem 6274,1; //Saint_Cloth_Piece getitem 6275,1; //King_Shield - set job_royal,5; + job_royal = 5; changequest 12093,12094; close; } else if (job_royal == 5) { @@ -437,7 +437,7 @@ glast_01,240,366,5 script Memory of King Schmidtz CLEAR_NPC,{ gl_church,173,88,0 script Delicate trace#01 CLEAR_NPC,{ if (job_royal == 4 && countitem(6274) == 0) { progressbar "ffff00",5; - set .@roy_ran, rand(1,70); + .@roy_ran = rand(1,70); if (.@roy_ran < 6) getitem 6274,1; //Saint_Cloth_Piece else if (.@roy_ran > 5 && .@roy_ran < 66) @@ -507,7 +507,7 @@ sec_in02,12,43,3 script sorcereryal 1_M_LIBRARYMASTER,1,1,{ mes "Set item to adjust the Royal Guard"; mes "You can only set a number between 1 to 5."; } else { - set job_royal, .@input; + job_royal = .@input; mes "Completed"; } close; @@ -519,7 +519,7 @@ sec_in02,12,43,3 script sorcereryal 1_M_LIBRARYMASTER,1,1,{ mes "Set item to adjust the Rune Knight"; mes "You can only set a nbumber between 1 to 24."; } else { - set job_rune_edq, .@input; + job_rune_edq = .@input; mes "Completed"; } close; @@ -531,7 +531,7 @@ sec_in02,12,43,3 script sorcereryal 1_M_LIBRARYMASTER,1,1,{ mes "Set item to adjust the Sorcerer"; mes "You can only set a number between 1 to 5."; } else { - set job_soc, .@input; + job_soc = .@input; mes "Completed"; } close; diff --git a/npc/re/jobs/3-2/shadow_chaser.txt b/npc/re/jobs/3-2/shadow_chaser.txt index fc95e1dc4..e51517446 100644 --- a/npc/re/jobs/3-2/shadow_chaser.txt +++ b/npc/re/jobs/3-2/shadow_chaser.txt @@ -38,7 +38,7 @@ morocc,156,70,3 script Girl#sc00 4_F_04,3,3,{ mes "[Girl]"; mes "Every time they visit us, they are on new missions."; mes "What missions are they doing I wonder?"; - set job_sha,1; + job_sha = 1; close; } else if (job_sha == 1) { mes "If you have any interest... just go!"; @@ -76,7 +76,7 @@ OnTouch: in_rogue,376,100,5 script Guild Member#sc01 4_M_ROGUE,{ if (BaseJob == Job_Rogue) { if (job_sha < 2) { - set @job_sha,0; + @job_sha = 0; OnDialogue: mes "[Vin]"; mes "Ah? What's this?"; @@ -104,8 +104,8 @@ in_rogue,376,100,5 script Guild Member#sc01 4_M_ROGUE,{ mes "My name is Urupa."; mes "If you are interested, could you come over here?"; if (@job_sha == 1) { - set job_sha,1; - set @job_sha,0; + job_sha = 1; + @job_sha = 0; } close; case 2: @@ -146,7 +146,7 @@ in_rogue,376,100,5 script Guild Member#sc01 4_M_ROGUE,{ in_rogue,379,99,1 script Guild Member#sc02 4_F_ROGUE,{ if (BaseJob == Job_Rogue) { if (job_sha < 2) { - set @job_sha,1; + @job_sha = 1; doevent "Guild Member#sc01::OnDialogue"; end; } @@ -183,7 +183,7 @@ in_rogue,379,101,3 script Scary Man#sc03 1_M_SIGNROGUE,{ mes "[Urupa]"; mes "My name is Urupa."; mes "If you have anything interesting just challenge it."; - set job_sha,1; + job_sha = 1; close; } mes "[Scary man]"; @@ -217,7 +217,7 @@ in_rogue,379,101,3 script Scary Man#sc03 1_M_SIGNROGUE,{ mes "[Urupa]"; mes "So write this down!"; mes "I expected that you would take this adventure!"; - set job_sha,2; + job_sha = 2; setquest 7160; close; } else if (job_sha == 2) { @@ -316,7 +316,7 @@ s_atelier,65,123,5 script Manager#sc04_prt 4_M_KHKYEL,{ mes "[Manager]"; mes "So you are the one."; mes "Could you wait for a sec'?"; - set job_sha,3; + job_sha = 3; close; } mes "[Manager]"; @@ -373,7 +373,7 @@ s_atelier,65,123,5 script Manager#sc04_prt 4_M_KHKYEL,{ mes "[Graham]"; mes "What the hell?"; mes "If you are not going to help then I'll just find someone else."; - set job_sha,4; + job_sha = 4; close; case 2: mes "[Graham]"; @@ -467,7 +467,7 @@ s_atelier,65,123,5 script Manager#sc04_prt 4_M_KHKYEL,{ mes "[Graham]"; mes "Ok?"; mes "Then go there!"; - set job_sha,9; + job_sha = 9; changequest 7165,7166; close; } else if (job_sha == 9) { @@ -569,21 +569,21 @@ L_Code: mes "Now let's move on to the mission."; mes "Here's the cipher..."; next; - set .@key01, rand(3,5); - set .@a, 1 + .@key01; - set .@b, 2 + .@key01; - set .@d, 4 + .@key01; - set .@e, 5 + .@key01; - set .@f, 6 + .@key01; - set .@h, 8 + .@key01; - set .@i, 9 + .@key01; - set .@l, 12 + .@key01; - set .@n, 14 + .@key01; - set .@o, 15 + .@key01; - set .@r, 18 + .@key01; - set .@s, 19 + .@key01; - set .@t, 20 + .@key01; - set .@u, 21 + .@key01; + .@key01 = rand(3,5); + .@a = 1 + .@key01; + .@b = 2 + .@key01; + .@d = 4 + .@key01; + .@e = 5 + .@key01; + .@f = 6 + .@key01; + .@h = 8 + .@key01; + .@i = 9 + .@key01; + .@l = 12 + .@key01; + .@n = 14 + .@key01; + .@o = 15 + .@key01; + .@r = 18 + .@key01; + .@s = 19 + .@key01; + .@t = 20 + .@key01; + .@u = 21 + .@key01; mes "^4d4dff" + .@b + " " + .@l + " " + .@u + " " + .@e + " "; mes "" + .@f + " " + .@i + " " + .@r + " " + .@e + " "; mes "" + .@i + " " + .@n + " "; @@ -592,7 +592,7 @@ L_Code: mes "" + .@t + " " + .@h + " " + .@i + " " + .@r + " " + .@d + " "; mes "" + .@f + " " + .@l + " " + .@o + " " + .@o + " " + .@r + " "; mes "key : " + .@key01 + "."; - set job_sha,5; + job_sha = 5; erasequest 7160; if (.@key01 == 3) setquest 7161; else if (.@key01 == 4) setquest 7162; @@ -706,7 +706,7 @@ s_atelier,168,65,5 script Manager#sc08_ra 4_M_DOCTOR,{ mes "What? You don't know it?"; mes "Then you'd better think about it more."; mes "It's so easy."; - set job_sha,10; + job_sha = 10; changequest 7166,7167; close; } @@ -806,7 +806,7 @@ s_atelier,168,65,5 script Manager#sc08_ra 4_M_DOCTOR,{ mes "If Haled isn't supportive..."; mes "Tell him ^4d4dffI know what you did last summer!^000000"; mes "You shouldn't be wrong...!?"; - set job_sha,18; + job_sha = 18; changequest 7172,7173; close; } else if (job_sha == 18) { @@ -863,19 +863,19 @@ L_Code: case 0: mes "[ S E E D ]"; mes "S E E D?"; - set job_sha,11; + job_sha = 11; changequest getarg(0),7168; break; case 1: mes "[ F O O T ]"; mes "F O O T?"; - set job_sha,12; + job_sha = 12; changequest getarg(0),7169; break; case 2: mes "[ C O L D ]"; mes "C O L D?"; - set job_sha,13; + job_sha = 13; changequest getarg(0),7170; break; } @@ -928,7 +928,7 @@ s_atelier,167,129,3 script Manager#sc06_yuno 1_M_SIGNART,{ mes "So what?"; mes "He's a wild-eyed person."; mes "Did you just speak to me in a threatening tone?"; - set job_sha,19; + job_sha = 19; close; } else if (job_sha == 19) { mes "[Haled]"; @@ -941,7 +941,7 @@ s_atelier,167,129,3 script Manager#sc06_yuno 1_M_SIGNART,{ mes "What's wrong with you?"; mes "Are you ok?"; mes "Paul? What do you want to say?"; - set job_sha,19; + job_sha = 19; close; } else if (job_sha == 20) { mes "[Haled]"; @@ -974,7 +974,7 @@ s_atelier,167,129,3 script Manager#sc06_yuno 1_M_SIGNART,{ mes "Of course, if you find something, you have to come back."; mes "Got it?"; mes "I'm going to write it down so that you won't forget."; - set job_sha,21; + job_sha = 21; changequest 7173,7174; close; } else if (job_sha == 21) { @@ -1046,7 +1046,7 @@ s_atelier,167,129,3 script Manager#sc06_yuno 1_M_SIGNART,{ mes "[Haled]"; mes "Ok. Let me finish."; mes "Go to Vicente in Lighthalzen."; - set job_sha,26; + job_sha = 26; changequest 7176,7177; close; } @@ -1112,7 +1112,7 @@ L_Code: mes "[Haled]"; mes "I need some time to collect my thoughts."; mes "Wait for me a bit."; - set job_sha,20; + job_sha = 20; close; } return; @@ -1220,7 +1220,7 @@ s_atelier,25,75,3 script Manager#sc10_lgt 4_M_HUMAN_02,{ mes "[Vicente]"; mes "You can't imagine what kind of things you might find."; mes "That's the final destination of all of the keys."; - set job_sha,27; + job_sha = 27; changequest 7177,7178; next; mes "[Vicente]"; @@ -1297,7 +1297,7 @@ s_atelier,25,75,3 script Manager#sc10_lgt 4_M_HUMAN_02,{ mes "There is someone who has been waiting for you."; mes "He's been waiting for someone to bring this brush back."; mes "Let's go inside."; - set job_sha,29; + job_sha = 29; erasequest 7179; close; } else if (job_sha == 29 || job_sha == 30) { @@ -1497,7 +1497,7 @@ s_atelier,70,66,4 script Dumk#sc13_lgh 4_M_SHADOWCHASER,{ mes "I'm so thirsty."; mes "Wait a minute."; delitem 6269,1; //Master_Brush - set job_sha,30; + job_sha = 30; close; } mes "[Dumk]"; @@ -1594,7 +1594,7 @@ s_atelier,70,66,4 script Dumk#sc13_lgh 4_M_SHADOWCHASER,{ jobchange roclass(eaclass()|EAJL_THIRD); getitem 6121,1; //Makeover_Brush getitem 6122,1; //Paint_Brush - set job_sha,32; + job_sha = 32; getitem 2795,1; //Green_Apple_Ring getitem 5750,1; //Shadow_Handicraft next; @@ -1674,8 +1674,8 @@ tur_dun03,38,209,1 script Blue Flame#sc_f01 4_NFWISP,{ mes "The deciphered code means..."; next; input .@inputstr$; - set .@dap01$, "blue fire in turtle island third floor"; - set .@dap02$, "BLUE FIRE IN TURTLE ISLAND THIRD FLOOR"; + .@dap01$ = "blue fire in turtle island third floor"; + .@dap02$ = "BLUE FIRE IN TURTLE ISLAND THIRD FLOOR"; if (.@inputstr$ != .@dap01$ && .@inputstr$ != .@dap02$) { mes "["+strcharinfo(0)+"]"; mes "What was it?"; @@ -1717,7 +1717,7 @@ tur_dun03,38,209,1 script Blue Flame#sc_f01 4_NFWISP,{ next; mes "The Blue Flame is growning and rolling."; mes "They seem to be related."; - set job_sha,6; + job_sha = 6; setquest 7164; if (questprogress(7161)) erasequest 7161; if (questprogress(7162)) erasequest 7162; @@ -1730,7 +1730,7 @@ tur_dun03,38,209,1 script Blue Flame#sc_f01 4_NFWISP,{ next; select("Pick up the marbles."); mes "When you pick them up, you can feel that your weight is lightened."; - set job_sha,7; + job_sha = 7; erasequest 7164; close2; warp "job3_sha01",22,82; @@ -1783,7 +1783,7 @@ ice_dun02,206,223,1 script Red Flame#sc_f02 4_NFWISP,{ mes "Then pick it up."; mes "Tear my soul and"; mes "show the truth."; - set job_sha, job_sha+3; + job_sha += 3; setquest 7171; close; } else if (job_sha == 14 || job_sha == 15 || job_sha == 16) { @@ -1889,7 +1889,7 @@ niflheim,230,276,1 script Red Flame#sc_f03 4_NFWISP,{ next; mes "The flame is dying."; mes "You should handle the shadow of pleasure."; - set job_sha,22; + job_sha = 22; erasequest 7174; setquest 7175; close; @@ -1897,7 +1897,7 @@ niflheim,230,276,1 script Red Flame#sc_f03 4_NFWISP,{ if (questprogress(7175,HUNTING) == 2) { mes "You can't feel the soul from the flame."; mes "When you go closer, you can't see well because of darkness."; - set job_sha,23; + job_sha = 23; erasequest 7175; close2; warp "job3_sha01",73,87; @@ -1934,7 +1934,7 @@ job3_sha01,22,78,0 script ????#keybox01 CLEAR_NPC,{ next; setarray .@Codes1$[1],"EFDFJWF","FGEGKXG","GHFHLYH","HIGIMZI","IJHJNAJ","JKIKOBK","KLJLPCL","LMKMQDM"; setarray .@Codes2$[1],"IPOFTUZ","JQPGUVA","KRQHVWB","LSRIWXC","MTSJXYD","NUTKYZE","OVULZAF","PWVMABG"; - set .@i, rand(1,8); + .@i = rand(1,8); mes " "; mes " "; mes " DECEIVE"; @@ -1973,7 +1973,7 @@ job3_sha01,22,78,0 script ????#keybox01 CLEAR_NPC,{ mes "There is a small and fabulous key."; next; mes "- You get the Key of Deception. -"; - set job_sha,8; + job_sha = 8; getitem 6266,1; //Cheat_Key setquest 7165; close; @@ -1997,7 +1997,7 @@ job3_sha01,25,28,0 script ????#keybox02 CLEAR_NPC,{ } setarray .@Words$[0],"SEED","FOOT","COLD"; setarray .@numbers[0],24,25,20; - set .@i,job_sha-14; + .@i = job_sha-14; if (job_sha > 13 && job_sha < 17) { mes "There are lots of boxes."; mes "with sort of numbers."; @@ -2038,7 +2038,7 @@ job3_sha01,25,28,0 script ????#keybox02 CLEAR_NPC,{ mes "Anyway, Paul will be disappointed."; mes "Key again..."; mes "How can I escape from here...?"; - set job_sha,17; + job_sha = 17; getitem 6267,1; //Virtual_Key erasequest 7171; changequest 7168+.@i,7172; @@ -2173,7 +2173,7 @@ job3_sha01,73,80,0 script ????#keybox03 CLEAR_NPC,{ mes "What? A key again!"; mes "Haled will be disappointed."; mes "I better go back."; - set job_sha,25; + job_sha = 25; setquest 7176; getitem 6268,1; //Mirth_Key close; @@ -2194,7 +2194,7 @@ job3_sha01,73,80,0 script ????#keybox03 CLEAR_NPC,{ mes "..."+.@inputstr$+"...?"; if (job_sha == 23) { mes "What does that mean?"; - set job_sha,24; + job_sha = 24; } else mes "Again? I don't get it."; close; @@ -2236,7 +2236,7 @@ job3_sha01,71,27,0 script ????#keybox04 CLEAR_NPC,{ delitem 6266,1; //Cheat_Key delitem 6267,1; //Virtual_Key delitem 6268,1; //Mirth_Key - set job_sha,28; + job_sha = 28; getitem 6269,1; //Master_Brush changequest 7178,7179; next; @@ -2274,7 +2274,7 @@ s_atelier,29,119,3 script Max#sc05_prt 4W_M_01,{ mes "You are a member of the Rogue guild!"; mes "What can I help you with?"; next; - set .@i, select("I need a make-up brush.:I need a paint brush.:Nothing."); + .@i = select("I need a make-up brush.:I need a paint brush.:Nothing."); mes "[Max]"; if (.@i == 1) setarray .@i[1],6121,1,10,100000; else if (.@i == 2) setarray .@i[1],6122,2,30,200000; @@ -2339,7 +2339,7 @@ s_atelier,136,70,3 script Titika#sc09_ra 4_F_CHILD,{ mes "You are in a guild."; mes "What can I help you with?"; next; - set .@i, select("Make a new make-up brush.:Make a new paint brush.:Nothing."); + .@i = select("Make a new make-up brush.:Make a new paint brush.:Nothing."); mes "[Titika]"; if (.@i == 1) setarray .@i[1],6121,1,10,100000; else if (.@i == 2) setarray .@i[1],6122,2,30,200000; @@ -2389,7 +2389,7 @@ s_atelier,124,128,3 script RimiGX#sc07_yuno 4_F_LGTGIRL,{ if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) { mes "What are you looking for?"; next; - set .@i, select("Make a new blush for make-up.:Make a new blush for painting.:Nothing."); + .@i = select("Make a new blush for make-up.:Make a new blush for painting.:Nothing."); mes "[RimiGX]"; if (.@i == 1) setarray .@i[1],6121,1,10,100000; else if (.@i == 2) setarray .@i[1],6122,2,30,200000; @@ -2438,7 +2438,7 @@ s_atelier,26,68,3 script Vito#sc11_lgt 4_M_KHMAN,{ if (Class == Job_Shadow_Chaser || Class == Job_Shadow_Chaser_T || Class == Job_Baby_Chaser) { mes "What are you looking for?"; next; - set .@i, select("Make a new blush for make-up.:Make a new blush for painting.:Nothing."); + .@i = select("Make a new blush for make-up.:Make a new blush for painting.:Nothing."); mes "[Vito]"; if (.@i == 1) setarray .@i[1],6121,1,10,100000; else if (.@i == 2) setarray .@i[1],6122,2,30,200000; diff --git a/npc/re/jobs/3-2/sorcerer.txt b/npc/re/jobs/3-2/sorcerer.txt index 5108dbe49..b3ccc3c62 100644 --- a/npc/re/jobs/3-2/sorcerer.txt +++ b/npc/re/jobs/3-2/sorcerer.txt @@ -64,7 +64,7 @@ gef_tower,102,34,5 script Merito 2_M_SAGE_B,{ mes "[Merito]"; mes "Give me a second to register your name."; mes "Talk to me again in a second."; - set job_soc,1; + job_soc = 1; close; } else if (job_soc == 1) { mes "Good, then I'll give you a short explanation about the Sorcerer."; @@ -111,7 +111,7 @@ gef_tower,102,34,5 script Merito 2_M_SAGE_B,{ mes "[Merito]"; mes "Okay. "; mes "Then I'll hand it over to Karacas who is on the 4th floor. He will guide you through the process of the test."; - set job_soc,2; + job_soc = 2; setquest 12096; close; case 2: @@ -224,7 +224,7 @@ gef_tower,113,161,5 script Karacas 4_M_SAGE_A,{ next; mes "[Karacas]"; mes "When you bring these materials, I'll tell you the next step."; - set job_soc,3; + job_soc = 3; changequest 12096,12097; close; } else if (job_soc == 3) { @@ -295,7 +295,7 @@ gef_tower,113,161,5 script Karacas 4_M_SAGE_A,{ mes "Then I'll write down the progress that I've summarized shortly. Wait..."; next; mes "^000099You got a paper on which the way of communicating with spirits is written. For more information please open your quest window^000000."; - set job_soc,4; + job_soc = 4; changequest 12097,12098; close; } @@ -321,7 +321,7 @@ gef_tower,113,161,5 script Karacas 4_M_SAGE_A,{ delitem 6276,1; //Clear_Reagent delitem 6278,1; //Black_Reagent delitem 6277,1; //Red_Reagent - set job_soc,5; + job_soc = 5; completequest 12098; close; } @@ -379,7 +379,7 @@ gef_tower,113,161,5 script Karacas 4_M_SAGE_A,{ if (job_soc == 4 && countitem(.@id[0]) > 2) { progressbar "ffff00",5; delitem .@id[0],3; //Boody_Red,Crystal_Blue,Yellow_Live,Wind_Of_Verdure - set .@soc_ran, rand(1,70); + .@soc_ran = rand(1,70); if (.@soc_ran < 10) { if (countitem(.@id[2]) == 0) { mes "You got a reagent by communicating with an unseen spirit."; diff --git a/npc/re/jobs/3-2/sura.txt b/npc/re/jobs/3-2/sura.txt index 787c42e7a..2e25a6f28 100644 --- a/npc/re/jobs/3-2/sura.txt +++ b/npc/re/jobs/3-2/sura.txt @@ -140,7 +140,7 @@ ve_in,237,125,0 script King Crab#job_shu 1_M_PAY_ELDER,{ mes "..."; mes "....."; mes "........(cheeks glowing)"; - set job_shu,1; + job_shu = 1; setquest 11155; close; } else { @@ -214,7 +214,7 @@ OnTimer600000: ve_in,97,149,0 script #Suraryokan HIDDEN_WARP_NPC,3,3,{ OnTouch: if (job_shu == 1) { - set .@n$, "["+strcharinfo(0)+"]"; + .@n$ = "["+strcharinfo(0)+"]"; mes "[???]"; mes "Who is it?!"; next; @@ -263,7 +263,7 @@ OnTouch: next; mes "[???]"; mes "What the hell do you want?"; - set job_shu,2; + job_shu = 2; close; } end; @@ -367,7 +367,7 @@ ve_in,98,159,0 script Fighter#job_shu 4_F_SURA,{ mes "[???]"; mes "Okay, then^f57d7d go and kill 100 Desert Wolves.^000000"; mes "After that, I'll think about it again."; - set job_shu,3; + job_shu = 3; changequest 11155,11156; close; case 2: @@ -393,7 +393,7 @@ ve_in,98,159,0 script Fighter#job_shu 4_F_SURA,{ next; mes "[Bruno]"; mes "Tell him that 'Bruno' sent you there and after that, just suit yourself."; - set job_shu,4; + job_shu = 4; changequest 11156,11157; close; } @@ -468,7 +468,7 @@ yuno_fild07,254,176,7 script Buddy#job_shu 4_M_MONK,{ next; mes "[Buddy]"; mes "This way..."; - set job_shu,5; + job_shu = 5; changequest 11157,11158; close2; warp "sword_1-1",215,244; @@ -802,7 +802,7 @@ sword_1-1,223,167,2 script Master#job_shu 4_M_SURA,{ } mes "[Master]"; mes "You should train yourself steadily until that day."; - set job_shu,100; + job_shu = 100; jobchange roclass(eaclass()|EAJL_THIRD); completequest 11158; getitem 5754,1; //Blazing_Soul diff --git a/npc/re/jobs/3-2/wanderer.txt b/npc/re/jobs/3-2/wanderer.txt index 5a3319a62..07842f0dd 100644 --- a/npc/re/jobs/3-2/wanderer.txt +++ b/npc/re/jobs/3-2/wanderer.txt @@ -73,7 +73,7 @@ xmas,162,209,5 script Aspiring Wanderer, Soy 4_F_06,{ mes "Right in front of the Christmas tree!"; mes "White snow, beautiful melody, and my captivating dance."; mes "Don't you think it would be a great performance?"; - set job_wan,1; + job_wan = 1; close; case 2: mes "[Mimi]"; @@ -128,7 +128,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ mes "But I'm so overwhelmed that I might go crazy. Ahhhh~~!"; next; while (1) { - set .@loop,0; + .@loop = 0; switch(select("Sorry, I don't care.:What's the matter?:Why are you telling me this?")) { case 1: mes "[Performance Manager]"; @@ -142,7 +142,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ mes "Those people don't feel any responsibility.."; mes "We're all expecting them and I've promoted them a lot."; next; - set .@loop,1; + .@loop = 1; break; case 3: emotion e_ag; @@ -155,7 +155,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ if (.@loop) break; } while (1) { - set .@loop,0; + .@loop = 0; switch(select("Is there a problem?:Who do you mean?:It has nothing to do with me.")) { case 1: mes "[Performance Manager]"; @@ -169,7 +169,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ mes "Swing swing, dangling dangling!!"; mes "This is awful."; next; - set .@loop,1; + .@loop = 1; break; case 2: mes "[Performance Manager]"; @@ -187,7 +187,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ if (.@loop) break; } while (1) { - set .@loop,0; + .@loop = 0; switch(select("Are you afraid of people?:The performers caused trouble?:Ignore him.")) { case 1: mes "[Performance Manager]"; @@ -207,7 +207,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ mes "Besides the money I spent for promoting and setting up the stage.."; mes "How can I handle all the angry people?"; next; - set .@loop,1; + .@loop = 1; break; case 3: mes "[Performance Manager]"; @@ -270,7 +270,7 @@ xmas,132,143,5 script Performance Manager#wnd 4_M_06,{ mes "[Performance Manager]"; mes "I don't know where Guitar Song is, but it is clear that he likes to visit the Comodo Casino!"; mes "Hu, Hurry up!! Oh, I really feel dizzy! Guitar Song!!!"; - set job_wan,2; + job_wan = 2; setquest 2218; close; } else if (job_wan == 2) { @@ -358,7 +358,7 @@ comodo,140,86,5 script Cheerless Maestro 4_M_MINSTREL,{ mes "I don't want to think about it. It just hurts my feelings."; next; mes "- Guitar Song is adamantly refusing to talk. What should I do to hear the story about <Nollio>? -"; - set job_wan,3; + job_wan = 3; close; } else if (job_wan == 3) { mes "[" + strcharinfo(0) + "]"; @@ -522,7 +522,7 @@ comodo,140,86,5 script Cheerless Maestro 4_M_MINSTREL,{ mes "[Guitar Song]"; mes "Although she loses her temper easily, her dance is so wonderful...."; mes "I don't know what I am doing wrong."; - set job_wan,4; + job_wan = 4; changequest 2218,2219; next; mes "[Guitar Song]"; @@ -546,7 +546,7 @@ comodo,140,86,5 script Cheerless Maestro 4_M_MINSTREL,{ next; mes "[Guitar Song]"; mes "I'll go there right away and scold her."; - set job_wan,9; + job_wan = 9; close; } else if (job_wan == 9) { mes "[Guitar Song]"; @@ -669,7 +669,7 @@ hu_in01,305,251,5 script Vacant Looking Lady#wnd 4_F_CAPEGIRL,{ next; mes "[Vacant Looking Lady]"; mes "<Nollio> is over! Boo hoo hoo!"; - set job_wan,5; + job_wan = 5; close; } else if (job_wan == 5) { emotion e_sob; @@ -728,7 +728,7 @@ hu_in01,305,251,5 script Vacant Looking Lady#wnd 4_F_CAPEGIRL,{ mes "I'll see you there."; mes "Just go one field South and one field West from here in Hugel."; mes "I'll meet you there."; - set job_wan,6; + job_wan = 6; changequest 2219,2220; close; } else if (job_wan == 6 || job_wan == 7) { @@ -766,7 +766,7 @@ hu_fild05,342,130,5 script Dancer Kim#fild 4_F_CAPEGIRL,{ mes "[Dancer Kim]"; mes "Good! Then ready, set~~"; mes "Go!"; - set job_wan,7; + job_wan = 7; changequest 2220,2221; close; } else if (job_wan == 7) { @@ -807,7 +807,7 @@ hu_fild05,342,130,5 script Dancer Kim#fild 4_F_CAPEGIRL,{ mes "[Dancer Kim]"; mes "You're a good person. I'm really happy that I met you."; mes "Thank god for sending such a stubborn person to me!"; - set job_wan,8; + job_wan = 8; changequest 2221,2222; close; } else { @@ -822,13 +822,13 @@ hu_fild05,342,130,5 script Dancer Kim#fild 4_F_CAPEGIRL,{ mes "I'm so tired. I don't give up halfway. It's a good exercise for me. I will have to give up Nollio to another Wanderer, it's all over...."; next; mes "- Dancer Kim dropped down by grief and fatigue -"; - set job_wan,6; + job_wan = 6; changequest 2221,2220; close; } else { mes "[Dancer Kim]"; mes "Huh...?"; - set job_wan,6; + job_wan = 6; close; } } else if (job_wan == 8) { @@ -981,7 +981,7 @@ xmas,147,135,5 script Dancer Kim#xmas 4_F_WANDERER,{ mapannounce "xmas","Dancer Kim: Introducing the rising Wanderer! " + strcharinfo(0) + "!",bc_map,"0xffff00"; //FW_NORMAL 12 0 0 mes "This rising Wanderer star, " + strcharinfo(0) + "!"; jobchange roclass(eaclass()|EAJL_THIRD); - set job_wan,10; + job_wan = 10; getitem 2795,1; //Green_Apple_Ring getitem 5758,1; //Dying_Swan completequest 2222; diff --git a/npc/re/jobs/novice/novice.txt b/npc/re/jobs/novice/novice.txt index 066f56331..aa991e8c3 100644 --- a/npc/re/jobs/novice/novice.txt +++ b/npc/re/jobs/novice/novice.txt @@ -44,7 +44,7 @@ mes "[Sprakki]"; mes "Walk over that bridge and there's a castle used as the Training Center."; mes "I will be waiting for you inside of that Castle. Please come to the castle by yourself."; - set job_novice_q,1; + job_novice_q = 1; setquest 7117; next; cutin "tutorial02",3; @@ -103,7 +103,7 @@ new_5-1,53,114,3 duplicate(NvSprakkiA) Sprakki#nv5a 4_F_01 mes "[Sprakki]"; mes "Well then, I will give you a quest to talk to me."; mes "After the conversation is over, talk to me again by left-clicking on me."; - set job_novice_q,1; + job_novice_q = 1; setquest 7117; next; cutin "tutorial02",3; @@ -121,7 +121,7 @@ new_5-1,53,114,3 duplicate(NvSprakkiA) Sprakki#nv5a 4_F_01 mes "[Sprakki]"; mes "Great!"; mes "Now you know how to move and talk to others, right?"; - set job_novice_q,2; + job_novice_q = 2; getexp 600,5; completequest 7117; next; @@ -152,19 +152,19 @@ new_5-1,53,114,3 duplicate(NvSprakkiA) Sprakki#nv5a 4_F_01 warp strnpcinfo(4),100,100; end; case 2: - set nov_1st_cos,0; - set nov_2nd_cos,0; - set nov_3_swordman,0; - set nov_3_archer,0; - set nov_3_thief,0; - set nov_3_magician,0; - set nov_3_acolyte,0; - set nov_3_merchant,0; + nov_1st_cos = 0; + nov_2nd_cos = 0; + nov_3_swordman = 0; + nov_3_archer = 0; + nov_3_thief = 0; + nov_3_magician = 0; + nov_3_acolyte = 0; + nov_3_merchant = 0; mes "[Sprakki]"; mes "Ok, You want to start right away."; mes "Which Town do you want to start at?"; next; - set .@select, select("Prontera:Morroc:Geffen:Payon:Alberta:Izlude"); + .@select = select("Prontera:Morroc:Geffen:Payon:Alberta:Izlude"); mes "[Sprakki]"; mes "I see."; mes "Go ahead and grow stronger! Look toward a brighter future ahead of you."; @@ -242,16 +242,16 @@ new_5-2,100,29,4 duplicate(NvSprakkiB) Sprakki#nv5b 4_F_01 mes "[Instructor Brade]"; mes "First off, try moving around."; mes "After moving around, talk to me again."; - set nov_1st_cos,0; - set nov_2nd_cos,0; - set nov_3_swordman,0; - set nov_3_archer,0; - set nov_3_thief,0; - set nov_3_magician,0; - set nov_3_acolyte,0; - set nov_3_merchant,0; - set treasure_alb,0; - set job_novice_q,2; + nov_1st_cos = 0; + nov_2nd_cos = 0; + nov_3_swordman = 0; + nov_3_archer = 0; + nov_3_thief = 0; + nov_3_magician = 0; + nov_3_acolyte = 0; + nov_3_merchant = 0; + treasure_alb = 0; + job_novice_q = 2; setquest 7118; next; cutin "tutorial02",3; @@ -272,7 +272,7 @@ new_5-2,100,29,4 duplicate(NvSprakkiB) Sprakki#nv5b 4_F_01 mes "[Instructor Brade]"; mes "Great."; mes "You've completed the given quest successfully, so I will reward you with experience points."; - set job_novice_q,3; + job_novice_q = 3; getexp 900,10; completequest 7118; next; @@ -300,7 +300,7 @@ new_5-2,100,29,4 duplicate(NvSprakkiB) Sprakki#nv5b 4_F_01 mes "Take these."; mes "Basic equipments and recovery potions."; } - set job_novice_q,4; + job_novice_q = 4; getitem 2352,1; //Novice_Plate getitem 2510,1; //Novice_Hood getitem 2414,1; //Novice_Boots @@ -358,7 +358,7 @@ new_5-2,100,29,4 duplicate(NvSprakkiB) Sprakki#nv5b 4_F_01 mes "[Instructor Brade]"; mes "You are all set."; mes "You are coming along just fine."; - set job_novice_q,5; + job_novice_q = 5; getexp 1200,15; getitem 12323,50; //N_Fly_Wing getitem 12324,20; //N_Butterfly_Wing @@ -429,7 +429,7 @@ new_5-2,100,29,4 duplicate(NvSprakkiB) Sprakki#nv5b 4_F_01 mes "[Instructor Brade]"; mes "You've come along fine this far."; mes "This is not much, but take this as a reward."; - set job_novice_q,7; + job_novice_q = 7; getitem 2393,1; //N_Adventurer's_Suit completequest 7120; close; @@ -514,7 +514,7 @@ new_5-2,100,105,3 duplicate(NvBradeA) Brade#nv5a 4_M_JOB_KNIGHT1 mes "[Jinha]"; mes "Well, you can directly go to the next step of the course."; mes "Go back to Instructor Brade."; - set job_novice_q,6; + job_novice_q = 6; close; } else { mes "[Jinha]"; @@ -537,8 +537,8 @@ new_5-2,100,105,3 duplicate(NvBradeA) Brade#nv5a 4_M_JOB_KNIGHT1 mes "Hot Key is ^4d4dffALT + S^000000."; mes "Why don't you try the skill?"; skill "NV_FIRSTAID",1,0; - set skill_nov,3; // Has future uses - do not remove! [Euphy] - set job_novice_q,6; + skill_nov = 3; // Has future uses - do not remove! [Euphy] + job_novice_q = 6; next; mes "[Jinha]"; mes "Good, now you know how to use the First Aid Skill, you have to move on to the next step."; @@ -625,7 +625,7 @@ new_5-2,115,120,3 duplicate(NvJinha) Jinha#nv5 1_M_ORIENT01 mes "[Chocolat]"; mes "Well then, let's hear from each of them."; mes "Start by talking to the [Kafra] Employee."; - set job_novice_q,8; + job_novice_q = 8; setquest 7121; next; mes "^4d4dff- You've received a quest from Chocolat."; @@ -669,7 +669,7 @@ new_5-2,115,120,3 duplicate(NvJinha) Jinha#nv5 1_M_ORIENT01 mes "[Chocolat]"; mes "Well then, let's hear from each of them."; mes "Start by talking to the [Kafra] Employee."; - set job_novice_q,8; + job_novice_q = 8; setquest 7121; close; } else if (job_novice_q == 8) { @@ -713,7 +713,7 @@ new_5-2,115,120,3 duplicate(NvJinha) Jinha#nv5 1_M_ORIENT01 next; mes "[Chocolat]"; mes "Besides these guys, there's many merchants selling various kind of items, so go check them out."; - set job_novice_q,12; + job_novice_q = 12; completequest 7121; getexp 1800,20; getitem 7059,20; //Cargo_Free_Ticket @@ -732,7 +732,7 @@ new_5-2,115,120,3 duplicate(NvJinha) Jinha#nv5 1_M_ORIENT01 mes "Real Combat Training will be given by Instructor Brade. You met him earlier."; mes "I will send you to the Real Combat Training Field."; close2; - set .@map$, "new_"+charat(strnpcinfo(4),4)+"-3"; + .@map$ = "new_"+charat(strnpcinfo(4),4)+"-3"; savepoint .@map$,96,21; warp .@map$,96,21; end; @@ -750,7 +750,7 @@ new_5-2,115,120,3 duplicate(NvJinha) Jinha#nv5 1_M_ORIENT01 mes "[Chocolat]"; mes "I will send you to the Real Combat Training Field."; close2; - set .@map$, "new_"+charat(strnpcinfo(4),4)+"-3"; + .@map$ = "new_"+charat(strnpcinfo(4),4)+"-3"; savepoint .@map$,96,21; warp .@map$,96,21; end; @@ -791,13 +791,13 @@ new_5-2,33,172,4 duplicate(NvChocolat) Chocolat#nv5 4W_KID callsub L_Services,2; //Storage next; callsub L_Services,3; //Teleport - set job_novice_q,9; + job_novice_q = 9; next; mes "[Kafra Employee]"; mes "Do you want to hear another explanation?"; next; while(1) { - set .@select, select("About Save:About Storage:About Teleport:About Cart:No More."); + .@select = select("About Save:About Storage:About Teleport:About Cart:No More."); if (.@select == 5) { mes "[Kafra Employee]"; mes "I hope you are satisfied with my explanation"; @@ -895,7 +895,7 @@ new_5-2,33,172,4 duplicate(NvChocolat) Chocolat#nv5 4W_KID mes "informed about?"; next; while(1) { - set .@select, select("About Save:About Storage:About Teleport:About Cart:No More."); + .@select = select("About Save:About Storage:About Teleport:About Cart:No More."); if (.@select == 5) { mes "[Kafra Employee]"; mes "I hope you are satisfied with my explanation"; @@ -1033,7 +1033,7 @@ new_5-2,30,176,4 duplicate(NvKafra) Kafra Employee#nv5 4_F_KAFRA1 next; mes "[Cool Event Corp. Staff]"; mes "Mostly all of us wear red coats in the places that the Kafra Employee's don't work in."; - set job_novice_q,10; + job_novice_q = 10; close; } else { mes "[Cool Event Corp. Staff]"; @@ -1066,7 +1066,7 @@ new_5-2,33,176,4 duplicate(NvCool) Cool Event Corp. Staff::NvCool5 4_M_ZONDAMAN mes "[Guide]"; mes "If you want to go to your first town, you can ask the Kafra Employee to the left."; mes "You can move there with the Teleport Service."; - set job_novice_q,11; + job_novice_q = 11; close; } else { mes "[Guide]"; @@ -1125,7 +1125,7 @@ new_5-2,36,176,4 duplicate(NvGuide) Guide#nv5 8W_SOLDIER mes "[Brade]"; mes "Then we will start your training."; mes "I'll write down the registration form."; - set job_novice_q,12; + job_novice_q = 12; close; } } else { @@ -1144,7 +1144,7 @@ new_5-2,36,176,4 duplicate(NvGuide) Guide#nv5 8W_SOLDIER mes "[Brade]"; mes "Then we will start your training."; mes "I'll write down the registration form."; - set job_novice_q,12; + job_novice_q = 12; close; } } @@ -1168,7 +1168,7 @@ new_5-2,36,176,4 duplicate(NvGuide) Guide#nv5 8W_SOLDIER mes "[Brade]"; mes "Then, let's go Poring hunting."; mes "Please hunt 'Poring's on Level 1 of the training grounds."; - set job_novice_q,13; + job_novice_q = 13; setquest 7122; getitem 569,100; //Novice_Potion savepoint strnpcinfo(4),96,21; @@ -1182,7 +1182,7 @@ new_5-2,36,176,4 duplicate(NvGuide) Guide#nv5 8W_SOLDIER mes "[Brade]"; mes "You can see it is not so hard, huh?"; mes "Nice job."; - set job_novice_q,14; + job_novice_q = 14; getitem 13040,1; //N_Cutter getexp 3000,30; completequest 7122; @@ -1222,7 +1222,7 @@ new_5-2,36,176,4 duplicate(NvGuide) Guide#nv5 8W_SOLDIER mes "[Brade]"; mes "Equip a manual of the job which you want to experience, and you will be able to use some basic skills of that corresponding job."; mes "Try those skills and decide which job to choose."; - set job_novice_q,15; + job_novice_q = 15; close; } else { mes "[Brade]"; @@ -2296,12 +2296,12 @@ new_5-3,97,50,4 duplicate(NvEden) Eden Group Officer#nv5 4_F_NOVICE,5,5 mes "[Trainer Brutus]"; mes "I see, then let me guide you to another level. Which level do you want to go to?"; next; - for(set .@i,1; .@i<6; set .@i,.@i+1) { + for(.@i = 1; .@i<6; ++.@i) { if (!compare(strnpcinfo(2),"nv"+.@i)) - set .@menu$, .@menu$+"Send me to Level "+.@i; - set .@menu$, .@menu$+":"; + .@menu$ += "Send me to Level "+.@i; + .@menu$ += ":"; } - set .@i, select(.@menu$+"Cancel"); + .@i = select(.@menu$+"Cancel"); if (.@i < 7) warp "new_"+.@i+"-3",96,21; close; @@ -2599,7 +2599,7 @@ L_Supplies: next; mes "[Hanson]"; mes "Free tickets for Kafra storage and transportation can be used for Kafra storage and teleport services."; - set nov_3_swordman,40; + nov_3_swordman = 40; getitem 7059,20; //Cargo_Free_Ticket getitem 7060,30; //Warp_Free_Ticket getitem 2393,1; //N_Adventurer's_Suit @@ -2672,7 +2672,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 mes "How about it?"; mes "Would you like to take the test?"; next; - set .@loop,1; + .@loop = 1; while(.@loop) { switch(select("Take the test.:What's the test for?:No, thank you.")) { case 1: @@ -2680,7 +2680,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 mes "Great!"; mes "Let's start the test~"; next; - set .@loop,0; + .@loop = 0; break; case 2: mes "[Lark]"; @@ -2716,23 +2716,23 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Fight against the punks:Cast Magic.:Call for Guards.:Throw rocks at them.")) { case 1: - set .@question_01$, "You subdue them easily."; - set .@swordman_p, .@swordman_p+1; - set .@taekwon_p, .@taekwon_p+1; - set .@ninja_p, .@ninja_p+1; + .@question_01$ = "You subdue them easily."; + ++.@swordman_p; + ++.@taekwon_p; + ++.@ninja_p; break; case 2: - set .@question_01$, "You cast a spell on them."; - set .@magician_p, .@magician_p+1; + .@question_01$ = "You cast a spell on them."; + ++.@magician_p; break; case 3: - set .@question_01$, "You call for help and Guards come to your aid."; - set .@acolyte_p, .@acolyte_p+1; + .@question_01$ = "You call for help and Guards come to your aid."; + ++.@acolyte_p; break; case 4: - set .@question_01$, "You skillfully throw rocks at the punks."; - set .@archer_p, .@archer_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + .@question_01$ = "You skillfully throw rocks at the punks."; + ++.@archer_p; + ++.@gunslinger_p; break; } mes "[Lark]"; @@ -2742,12 +2742,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Man:Woman")) { case 1: - set .@question_02_01$, "he"; - set .@question_02_02$, "son"; + .@question_02_01$ = "he"; + .@question_02_02$ = "son"; break; case 2: - set .@question_02_01$, "she"; - set .@question_02_02$, "daughter"; + .@question_02_01$ = "she"; + .@question_02_02$ = "daughter"; break; } mes "[Lark]"; @@ -2756,16 +2756,16 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Delivering an important object:Delivering a small souvenir:Delivering a message")) { case 1: - set .@swordman_p, .@swordman_p+1; - set .@archer_p, .@archer_p+1; - set .@magician_p, .@magician_p+1; + ++.@swordman_p; + ++.@archer_p; + ++.@magician_p; break; case 2: - set .@thief_p, .@thief_p+1; - set .@taekwon_p, .@taekwon_p+1; + ++.@thief_p; + ++.@taekwon_p; break; case 3: - set .@acolyte_p, .@acolyte_p+1; + ++.@acolyte_p; break; } mes "[Lark]"; @@ -2774,31 +2774,31 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Capital city, Prontera:Mountain city, Payon:Port city, Alberta:Magic city, Geffen:Satelite city, Izlude:Desert city, Morocc:Industrial city, Einbroch:World of natural life, Amatsu:Garden city, Hugel")) { case 1: - set .@acolyte_p, .@acolyte_p+1; + ++.@acolyte_p; break; case 2: - set .@taekwon_p, .@taekwon_p+1; + ++.@taekwon_p; break; case 3: - set .@merchant_p, .@merchant_p+1; + ++.@merchant_p; break; case 4: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; case 5: - set .@swordman_p, .@swordman_p+1; + ++.@swordman_p; break; case 6: - set .@thief_p, .@thief_p+1; + ++.@thief_p; break; case 7: - set .@gunslinger_p, .@gunslinger_p+1; + ++.@gunslinger_p; break; case 8: - set .@ninja_p, .@ninja_p+1; + ++.@ninja_p; break; case 9: - set .@archer_p, .@archer_p+1; + ++.@archer_p; break; } mes "[Lark]"; @@ -2806,17 +2806,17 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Happening:Not happening.")) { case 1: - set .@thief_p, .@thief_p+1; - set .@swordman_p, .@swordman_p+1; - set .@ninja_p, .@ninja_p+1; - set .@taekwon_p, .@taekwon_p+1; - set .@magician_p, .@magician_p+1; - set .@thief_p, .@thief_p+1; + ++.@thief_p; + ++.@swordman_p; + ++.@ninja_p; + ++.@taekwon_p; + ++.@magician_p; + ++.@thief_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; - set .@merchant_p, .@merchant_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@acolyte_p; + ++.@merchant_p; + ++.@gunslinger_p; break; } mes "[Lark]"; @@ -2825,61 +2825,61 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Study:Exercise:Service:Violence")) { case 1: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; case 2: - set .@thief_p, .@thief_p+1; - set .@swordman_p, .@swordman_p+1; - set .@taekwon_p, .@taekwon_p+1; + ++.@thief_p; + ++.@swordman_p; + ++.@taekwon_p; break; case 3: - set .@acolyte_p, .@acolyte_p+1; + ++.@acolyte_p; break; case 4: - set .@thief_p, .@thief_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@thief_p; + ++.@ninja_p; break; } switch(select("Change:Preservation")) { case 1: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; + ++.@acolyte_p; break; } switch(select("Consumer:Seller:Producer")) { case 1: - set .@swordman_p, .@swordman_p+1; - set .@thief_p, .@thief_p+1; - set .@acolyte_p, .@acolyte_p+1; - set .@archer_p, .@archer_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@swordman_p; + ++.@thief_p; + ++.@acolyte_p; + ++.@archer_p; + ++.@gunslinger_p; break; case 2: - set .@merchant_p, .@merchant_p+1; + ++.@merchant_p; break; case 3: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; } switch(select("Speed:Caution")) { case 1: - set .@thief_p, .@thief_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@thief_p; + ++.@ninja_p; break; case 2: - set .@archer_p, .@archer_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@archer_p; + ++.@gunslinger_p; break; } switch(select("Theory:Experience")) { case 1: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; case 2: - set .@swordman_p, .@swordman_p+1; - set .@taekwon_p, .@taekwon_p+1; + ++.@swordman_p; + ++.@taekwon_p; break; } mes "[Lark]"; @@ -2891,11 +2891,11 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@merchant_p, .@merchant_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@merchant_p; + ++.@ninja_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; + ++.@acolyte_p; break; } mes "[Lark]"; @@ -2903,12 +2903,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@ninja_p, .@ninja_p+1; - set .@archer_p, .@archer_p+1; + ++.@ninja_p; + ++.@archer_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@acolyte_p; + ++.@gunslinger_p; break; } mes "[Lark]"; @@ -2916,12 +2916,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@swordman_p, .@swordman_p+1; - set .@merchant_p, .@merchant_p+1; + ++.@swordman_p; + ++.@merchant_p; break; case 2: - set .@magician_p, .@magician_p+1; - set .@taekwon_p, .@taekwon_p+1; + ++.@magician_p; + ++.@taekwon_p; break; } mes "[Lark]"; @@ -2929,12 +2929,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@taekwon_p, .@taekwon_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@taekwon_p; + ++.@gunslinger_p; break; case 2: - set .@ninja_p, .@ninja_p+1; - set .@merchant_p, .@merchant_p+1; + ++.@ninja_p; + ++.@merchant_p; break; } mes "[Lark]"; @@ -2942,11 +2942,11 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; case 2: - set .@archer_p, .@archer_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@archer_p; + ++.@gunslinger_p; break; } mes "[Lark]"; @@ -2954,12 +2954,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@merchant_p, .@merchant_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@merchant_p; + ++.@ninja_p; break; case 2: - set .@swordman_p, .@swordman_p+1; - set .@thief_p, .@thief_p+1; + ++.@swordman_p; + ++.@thief_p; break; } mes "[Lark]"; @@ -2967,12 +2967,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@thief_p, .@thief_p+1; - set .@swordman_p, .@swordman_p+1; + ++.@thief_p; + ++.@swordman_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; - set .@taekwon_p, .@taekwon_p+1; + ++.@acolyte_p; + ++.@taekwon_p; break; } mes "[Lark]"; @@ -2980,12 +2980,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@magician_p, .@magician_p+1; - set .@merchant_p, .@merchant_p+1; + ++.@magician_p; + ++.@merchant_p; break; case 2: - set .@thief_p, .@thief_p+1; - set .@archer_p, .@archer_p+1; + ++.@thief_p; + ++.@archer_p; break; } mes "[Lark]"; @@ -2993,12 +2993,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@ninja_p, .@ninja_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@ninja_p; + ++.@gunslinger_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; - set .@swordman_p, .@swordman_p+1; + ++.@acolyte_p; + ++.@swordman_p; break; } mes "[Lark]"; @@ -3006,12 +3006,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@acolyte_p, .@acolyte_p+1; - set .@swordman_p, .@swordman_p+1; + ++.@acolyte_p; + ++.@swordman_p; break; case 2: - set .@archer_p, .@archer_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@archer_p; + ++.@ninja_p; break; } mes "[Lark]"; @@ -3019,11 +3019,11 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@thief_p, .@thief_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@thief_p; + ++.@ninja_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; + ++.@acolyte_p; break; } mes "[Lark]"; @@ -3031,11 +3031,11 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@gunslinger_p, .@gunslinger_p+1; - set .@archer_p, .@archer_p+1; + ++.@gunslinger_p; + ++.@archer_p; break; case 2: - set .@taekwon_p, .@taekwon_p+1; + ++.@taekwon_p; break; } mes "[Lark]"; @@ -3043,13 +3043,13 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@magician_p, .@magician_p+1; - set .@gunslinger_p, .@gunslinger_p+1; - set .@archer_p, .@archer_p+1; + ++.@magician_p; + ++.@gunslinger_p; + ++.@archer_p; break; case 2: - set .@taekwon_p, .@taekwon_p+1; - set .@magician_p, .@magician_p+1; + ++.@taekwon_p; + ++.@magician_p; break; } mes "[Lark]"; @@ -3057,11 +3057,11 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@swordman_p, .@swordman_p+1; + ++.@swordman_p; break; case 2: - set .@thief_p, .@thief_p+1; - set .@ninja_p, .@ninja_p+1; + ++.@thief_p; + ++.@ninja_p; break; } mes "[Lark]"; @@ -3069,12 +3069,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@archer_p, .@archer_p+1; - set .@merchant_p, .@merchant_p+1; + ++.@archer_p; + ++.@merchant_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; - set .@archer_p, .@archer_p+1; + ++.@acolyte_p; + ++.@archer_p; break; } mes "[Lark]"; @@ -3082,12 +3082,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@taekwon_p, .@taekwon_p+1; - set .@thief_p, .@thief_p+1; + ++.@taekwon_p; + ++.@thief_p; break; case 2: - set .@archer_p, .@archer_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@archer_p; + ++.@gunslinger_p; break; } mes "[Lark]"; @@ -3095,12 +3095,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@swordman_p, .@swordman_p+1; - set .@merchant_p, .@merchant_p+1; + ++.@swordman_p; + ++.@merchant_p; break; case 2: - set .@magician_p, .@magician_p+1; - set .@thief_p, .@thief_p+1; + ++.@magician_p; + ++.@thief_p; break; } mes "[Lark]"; @@ -3108,12 +3108,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@gunslinger_p, .@gunslinger_p+1; - set .@archer_p, .@archer_p+1; + ++.@gunslinger_p; + ++.@archer_p; break; case 2: - set .@acolyte_p, .@acolyte_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@acolyte_p; + ++.@gunslinger_p; break; } mes "[Lark]"; @@ -3121,12 +3121,12 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@thief_p, .@thief_p+1; - set .@gunslinger_p, .@gunslinger_p+1; + ++.@thief_p; + ++.@gunslinger_p; break; case 2: - set .@gunslinger_p, .@gunslinger_p+1; - set .@merchant_p, .@merchant_p+1; + ++.@gunslinger_p; + ++.@merchant_p; break; } mes "[Lark]"; @@ -3134,11 +3134,11 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(select("Yes:No")) { case 1: - set .@magician_p, .@magician_p+1; + ++.@magician_p; break; case 2: - set .@ninja_p, .@ninja_p+1; - set .@archer_p, .@archer_p+1; + ++.@ninja_p; + ++.@archer_p; break; } @@ -3146,14 +3146,14 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 // In the official script, higher .@who_job value always wins in a tie. setarray .@points[0], .@swordman_p, .@magician_p, .@archer_p, .@merchant_p, .@thief_p, .@acolyte_p, .@taekwon_p, .@gunslinger_p, .@ninja_p; - set .@max, .@points[0]; - for(set .@i,1; .@i<9; set .@i,.@i+1) { + .@max = .@points[0]; + for(.@i = 1; .@i<9; ++.@i) { if (.@points[.@i] >= .@max) { - set .@max, .@points[.@i]; - set .@ele, .@i; + .@max = .@points[.@i]; + .@ele = .@i; } } - set .@who_job, .@ele+1; // To match the official script's numbering. + .@who_job = .@ele+1; // To match the official script's numbering. mes "[Lark]"; mes "Thank you, have a long life."; @@ -3169,7 +3169,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; switch(.@who_job) { case 1: - set .@job$, "Swordman"; + .@job$ = "Swordman"; mes "[Lark]"; mes "...simple and straightforward..."; mes "...strong beliefs can affect the world..."; @@ -3179,7 +3179,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 2: - set .@job$, "Wizard"; + .@job$ = "Wizard"; mes "[Lark]"; mes "...to understand all these things alone deulmyeo..."; mes "...hard work and independent thinking..."; @@ -3189,7 +3189,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 3: - set .@job$, "Archer"; + .@job$ = "Archer"; mes "[Lark]"; mes "...immeasurable, have many emotions..."; mes "...to people who are trying to understand..."; @@ -3200,7 +3200,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 4: - set .@job$, "Merchant"; + .@job$ = "Merchant"; mes "[Lark]"; mes "...to identify people's sense of hearing..."; mes "...outstanding determination and goals..."; @@ -3209,7 +3209,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 5: - set .@job$, "Thief"; + .@job$ = "Thief"; mes "[Lark]"; mes "...always makes life fun and who wants..."; mes "...always trying to find a new job..."; @@ -3219,7 +3219,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 6: - set .@job$, "Acolyte"; + .@job$ = "Acolyte"; mes "[Lark]"; mes "...mentality makes him warm and considerate for others..."; mes "I know I have loved anyone,..."; @@ -3229,7 +3229,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 7: - set .@job$, "Taekwon Boy/Girl"; + .@job$ = "Taekwon Boy/Girl"; mes "[Lark]"; mes "...to believe with a stubborn conviction..."; mes "...heart and spirit of the grassland is consistent: it..."; @@ -3240,7 +3240,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 8: - set .@job$, "Gunslinger"; + .@job$ = "Gunslinger"; mes "[Lark]"; mes "People often praised Justice."; mes "Sometimes fear and confusion may exist..."; @@ -3250,7 +3250,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 next; break; case 9: - set .@job$, "Ninja"; + .@job$ = "Ninja"; mes "[Lark]"; mes "...to avoid the type of self-aspiring..."; mes "...married to a prominent goal and quietly avoiding..."; @@ -3297,7 +3297,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 mes "[Lark]"; mes "Yes, sir. Please select your desired job."; next; - set .@who_job, select("Swordman:Wizard:Archer:Merchant:Thief:Acolyte:Taekwon Boy/Girl:Gunslinger:Ninja:I'll think again."); + .@who_job = select("Swordman:Wizard:Archer:Merchant:Thief:Acolyte:Taekwon Boy/Girl:Gunslinger:Ninja:I'll think again."); if (.@who_job == 10) { mes "[Lark]"; mes "The Novice Training Center has a lot of sea experience, please pay attention along the way."; @@ -3306,7 +3306,7 @@ new_5-4,100,29,1 duplicate(NvHanson) Final Tester#nv5 1_ETC_01 break; } callfunc "F_NvErase",1; - set .@str$, "^A62A2A'"+strcharinfo(0)+"^000000'! Take care and may Freya bless you on your journey."; + .@str$ = "^A62A2A'"+strcharinfo(0)+"^000000'! Take care and may Freya bless you on your journey."; switch(.@who_job) { case 1: mes "[Lark]"; diff --git a/npc/re/jobs/novice/supernovice_ex.txt b/npc/re/jobs/novice/supernovice_ex.txt index 62facbdf9..5578d7700 100644 --- a/npc/re/jobs/novice/supernovice_ex.txt +++ b/npc/re/jobs/novice/supernovice_ex.txt @@ -48,7 +48,7 @@ function script Esseray_Ex { mes "You should find him."; next; setquest 5092; - set EXSUPNOV_Q,1; + EXSUPNOV_Q = 1; mes "[Esseray]"; mes "He can guide you along"; mes "the correct path..."; @@ -251,7 +251,7 @@ beach_dun2,119,92,4 script Fishing Novice#sp2 4_M_SIT_NOVICE,{ mes "Do you know what this is for?"; next; setarray .@Monsters$[0],"Poring","Lunatic","Fabre","Picky"; - set .@i, rand(4); + .@i = rand(4); changequest 5093,5094+.@i; mes "[Nodor]"; mes "You know what a ^FF0000"+.@Monsters$[.@i]+"^000000 monster is, right?"; @@ -291,7 +291,7 @@ beach_dun2,119,92,4 script Fishing Novice#sp2 4_M_SIT_NOVICE,{ mes "You are better than I thought."; mes "Anyway, what was the monster that I told you to hunt?"; next; - set .@i, select("Poring:Lunatic:Fabre:Picky:Baphomet")-1; + .@i = select("Poring:Lunatic:Fabre:Picky:Baphomet")-1; if (.@i == 4) { mes "[Nodor]"; mes "Heheh? Can you seriously hunt Baphomet alone?"; @@ -393,9 +393,9 @@ beach_dun2,119,92,4 script Fishing Novice#sp2 4_M_SIT_NOVICE,{ close; } else if (questprogress(5100)) { - if (EXSUPNOV_Q_ == 3) set .@str$,"300,000"; - else if (EXSUPNOV_Q_ == 4) set .@str$,"1,000,000"; - else set .@str$,"100,000"; + if (EXSUPNOV_Q_ == 3) .@str$ = "300,000"; + else if (EXSUPNOV_Q_ == 4) .@str$ = "1,000,000"; + else .@str$ = "100,000"; mes "[Nodor]"; mes "Hey, have you gone there?"; mes "I got another message from my bro."; @@ -477,7 +477,7 @@ beach_dun2,119,92,4 script Fishing Novice#sp2 4_M_SIT_NOVICE,{ nude; callfunc "F_ClearJobVar"; // -- Clears all job variables for the current player jobchange roclass(eaclass()|EAJL_THIRD); - set EXSUPNOV_Q,5; + EXSUPNOV_Q = 5; emotion e_heh; mes "[Nodor]"; mes "Puhahahahahahahahahahah!!"; @@ -570,7 +570,7 @@ beach_dun2,119,92,4 script Fishing Novice#sp2 4_M_SIT_NOVICE,{ specialeffect2 EF_RECOVERY; mes "[Nodor]"; mes "Let Super Novice "+strcharinfo(0)+" be blessed with the Super Novice Guardian!"; - set EXSUPNOV_Q,6; + EXSUPNOV_Q = 6; close; } else if (EXSUPNOV_Q > 5) { @@ -610,7 +610,7 @@ airplane,33,47,5 script Nudor#sp2 4_F_NOVICE,{ mes "- eyes, holding out his hands. -"; mes "- How much do you want to give? -"; next; - set .@i, select("I have no money:Give 100,000 Zeny:Give 300,000 Zeny:Give 1,000,000 Zeny:Give all the money you have"); + .@i = select("I have no money:Give 100,000 Zeny:Give 300,000 Zeny:Give 1,000,000 Zeny:Give all the money you have"); mes "[Nudor]"; if (.@i == 1) { mes "- crying -"; @@ -622,9 +622,9 @@ airplane,33,47,5 script Nudor#sp2 4_F_NOVICE,{ } else if (.@i < 5) { switch(.@i) { - case 2: set .@str$,"100,000"; set .@n,100000; break; - case 3: set .@str$,"300,000"; set .@n,300000; break; - case 4: set .@str$,"1,000,000"; set .@n,1000000; break; + case 2: .@str$ = "100,000"; .@n = 100000; break; + case 3: .@str$ = "300,000"; .@n = 300000; break; + case 4: .@str$ = "1,000,000"; .@n = 1000000; break; } mes "Lovely~~ Did he give you "+.@str$+" Zeny? That's pretty much!"; next; @@ -647,18 +647,18 @@ airplane,33,47,5 script Nudor#sp2 4_F_NOVICE,{ mes "Eh? But you don't have any money. You're so poor, huh?"; close; } - set .@n,Zeny; + .@n = Zeny; } mes "[Nudor]"; mes "Woa~!! "+.@n+" Zeny! This helped me so much~ Tehee~"; mes "I can't believe it..."; changequest 5099,5100; Zeny -= .@n; - if (.@i < 5) set EXSUPNOV_Q_, .@i; + if (.@i < 5) EXSUPNOV_Q_ = .@i; else { - if (.@n > 1000000) set EXSUPNOV_Q_,4; - else if (.@n > 300000) set EX_SUPNOV_Q_,3; - else set EXSUPNOV_Q_,2; + if (.@n > 1000000) EXSUPNOV_Q_ = 4; + else if (.@n > 300000) EX_SUPNOV_Q_ = 3; + else EXSUPNOV_Q_ = 2; } next; mes "[Nudor]"; diff --git a/npc/re/jobs/repair.txt b/npc/re/jobs/repair.txt index 58d2489e4..fd3c51d7a 100644 --- a/npc/re/jobs/repair.txt +++ b/npc/re/jobs/repair.txt @@ -82,7 +82,7 @@ prt_in,38,104,4 script Valerie 4_F_VALKYRIE,{ close; } setarray .@items[0], 2796, 2797, 6152, 6151; //Magical_Stone,Magical_Stone_,Glittering_Crystal,Peice_Of_Great_Bradium - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { if (countitem(.@items[.@i])) delitem .@items[.@i], countitem(.@items[.@i]); } @@ -100,7 +100,7 @@ prt_in,38,104,4 script Valerie 4_F_VALKYRIE,{ // Rebirth - variable if ((Class >= Job_Swordman && Class <= Job_Crusader2) && ADVJOB != 0) { - set ADVJOB,0; + ADVJOB = 0; mes "[Valerie]"; mes "You're carrying big karma- You should erase it."; next; @@ -187,7 +187,7 @@ L_Third: if (questprogress(getarg(1)) == 2) erasequest getarg(1); } - for(set .@i,getarg(2); .@i<=getarg(3); set .@i,.@i+1) { + for(.@i = getarg(2); .@i<=getarg(3); ++.@i) { if (questprogress(.@i)) erasequest .@i; } @@ -239,33 +239,33 @@ sec_in02,12,40,5 script Job Repair 1_M_LIBRARYMASTER,1,1,{ mes "Please input your password."; next; if (callfunc("F_GM_NPC","1854",1) == 1) { - set job_arch,100; - set job_3rd_gc,100; - set job__mechanic,100; - set job_ranger01,100; - set job_rune_edq,100; - set job_wl,100; - set job_gen,100; - set job_min,100; - set job_royal,100; - set job_sha,100; - set job_soc,100; - set job_shu,100; - set job_wan,100; - set KNIGHT_Q,100; - set PRIEST_Q,100; - set WIZ_Q,100; - set BSMITH_Q,100; - set ASSIN_Q,100; - set HNTR_Q,100; - set CRUS_Q,100; - set MONK_Q,100; - set SAGE_Q,100; - set ALCH_Q,100; - set ROGUE_Q,100; - set BARD_Q,100; - set DANC_Q,100; - set ADVJOB,15; + job_arch = 100; + job_3rd_gc = 100; + job__mechanic = 100; + job_ranger01 = 100; + job_rune_edq = 100; + job_wl = 100; + job_gen = 100; + job_min = 100; + job_royal = 100; + job_sha = 100; + job_soc = 100; + job_shu = 100; + job_wan = 100; + KNIGHT_Q = 100; + PRIEST_Q = 100; + WIZ_Q = 100; + BSMITH_Q = 100; + ASSIN_Q = 100; + HNTR_Q = 100; + CRUS_Q = 100; + MONK_Q = 100; + SAGE_Q = 100; + ALCH_Q = 100; + ROGUE_Q = 100; + BARD_Q = 100; + DANC_Q = 100; + ADVJOB = 15; } close; } diff --git a/npc/re/merchants/3rd_trader.txt b/npc/re/merchants/3rd_trader.txt index 792b7abd9..51b50fdcf 100644 --- a/npc/re/merchants/3rd_trader.txt +++ b/npc/re/merchants/3rd_trader.txt @@ -34,18 +34,18 @@ mes "Each Herb costs 4,000 zeny."; mes "What would you like?"; next; - set .@i, select("Nerium:Rantana:Makulata:Seratum:Scopolia:Amoena:Poison Kit:Cancel")-1; + .@i = select("Nerium:Rantana:Makulata:Seratum:Scopolia:Amoena:Poison Kit:Cancel")-1; mes "[Poison Herb Merchant]"; if (.@i < 6) { - set .@item,7932+.@i; - set .@price,4000; - set .@max,2000; - set .@max$,"2,000"; + .@item = 7932+.@i; + .@price = 4000; + .@max = 2000; + .@max$ = "2,000"; } else if (.@i == 6) { - set .@item,7931; - set .@price,5000; - set .@max,500; - set .@max$,"500"; + .@item = 7931; + .@price = 5000; + .@max = 500; + .@max$ = "500"; mes "Each Poison Kit costs 5,000 zeny."; } else { mes "Well, I see. Come back again~!"; @@ -66,7 +66,7 @@ mes "The number must be less than "+.@max$+"!"; close; } - set .@total, .@amount * .@price; + .@total = .@amount * .@price; if (Zeny < .@total) { mes "[Poison Herb Merchant]"; mes "You don't have enough money."; @@ -99,18 +99,18 @@ lhz_in02,16,205,4 duplicate(phs) Poison Herb Merchant#lhz 4_F_YUNYANG mes "I sell all sorts of Rune Stones!"; mes "What would you like?"; next; - set .@i, select("Buy high-quality Rune Stones.:Buy ordinary Rune Stones."); + .@i = select("Buy high-quality Rune Stones.:Buy ordinary Rune Stones."); mes "[Rune Merchant]"; if (.@i == 1) { mes "High-quality Runes!"; mes "They cost 2,500 zeny each!"; - set .@item,12734; //Runstone_Quality - set .@price,2500; + .@item = 12734; //Runstone_Quality + .@price = 2500; } else { mes "Ordinary Rune Stones?"; mes "They cost 1,000 zeny each!"; - set .@item,12737; //Runstone_Ordinary - set .@price,1000; + .@item = 12737; //Runstone_Ordinary + .@price = 1000; setarray .@rune[0],12737,1000; } mes "Tell me how many you want,"; @@ -128,7 +128,7 @@ lhz_in02,16,205,4 duplicate(phs) Poison Herb Merchant#lhz 4_F_YUNYANG mes "The number must be less than 2,000!"; close; } - set .@total, .@amount * .@price; + .@total = .@amount * .@price; if (Zeny < .@total) { mes "[Rune Merchant]"; mes "Zeny! Zeny!"; @@ -166,7 +166,7 @@ job3_guil01,91,93,3 script Rare Herb Collector 1_M_03,{ mes "[Rare Poison Herb Collector]"; mes "I wander around the world and collect rare poison herbs. Recently, I started dealing in the herb called Izidor. If you are interested, you can buy them."; next; - set .@i, select("How can I buy them?:Exchange it for Animal Blood:Exchange it for a Bitter Herb:Exchange it for a Deadly Noxious Herb:Exchange it for a Frozen Rose:Exchange it for Ment:Exchange it for Hinalle")-2; + .@i = select("How can I buy them?:Exchange it for Animal Blood:Exchange it for a Bitter Herb:Exchange it for a Deadly Noxious Herb:Exchange it for a Frozen Rose:Exchange it for Ment:Exchange it for Hinalle")-2; if (.@i == -1) { mes "[Rare Poison Herb Collector]"; mes "You can buy them for 10,000 zeny and one of these rare items, Animal Blood, Bitter Herb, Deadly Noxious Herb, Frozen Rose, Ment or an Hinalle."; @@ -176,8 +176,8 @@ job3_guil01,91,93,3 script Rare Herb Collector 1_M_03,{ close; } else { setarray .@exchange[0],702,621,631,749,605,703; - set .@item, .@exchange[.@i]; - set .@price, 10000; + .@item = .@exchange[.@i]; + .@price = 10000; mes "[Rare Poison Herb Collector]"; mes "How many do you want?"; @@ -195,7 +195,7 @@ job3_guil01,91,93,3 script Rare Herb Collector 1_M_03,{ mes "The number must be less than 2,000!"; close; } - set .@total, .@amount * .@price; + .@total = .@amount * .@price; if (countitem(.@item) < .@amount || Zeny < .@total) { mes "[Rare Poison Herb Collector]"; mes "Hey, come back when you have all the requirements for the exchange."; @@ -228,7 +228,7 @@ job3_guil01,91,93,3 script Rare Herb Collector 1_M_03,{ mes "[Point Merchant]"; mes "Hello. I'm selling a catalyst called ^FF0000Points^000000 for Sorcerers. What would you like?"; next; - set .@i, select("Scarlet Points - 200z:Lime Green Points - 200z:Indigo Points - 200z:Yellow Wish Points - 200z:Cancel")-1; + .@i = select("Scarlet Points - 200z:Lime Green Points - 200z:Indigo Points - 200z:Yellow Wish Points - 200z:Cancel")-1; mes "[Point Merchant]"; if (.@i == 4) { mes "You can't find the stuff you need?"; diff --git a/npc/re/merchants/advanced_refiner.txt b/npc/re/merchants/advanced_refiner.txt index ddd48b836..d637ace73 100644 --- a/npc/re/merchants/advanced_refiner.txt +++ b/npc/re/merchants/advanced_refiner.txt @@ -26,10 +26,10 @@ malangdo,221,174,6 script Holink#mal_cash 4_CAT_ADV1,{ mes "What should Holink~ refine today?"; next; setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) - set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Empty]")+":"; - set .@part, select(.@menu$); + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) + .@menu$ = .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Empty]")+":"; + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Holink]"; switch(.@part) { @@ -77,33 +77,33 @@ malangdo,221,174,6 script Holink#mal_cash 4_CAT_ADV1,{ switch(getequipweaponlv(.@part)) { default: case 0: // Armor - set .@price,15000; - set .@material,7619; //Enriched_Elunium - set .@type$,"armor"; + .@price = 15000; + .@material = 7619; //Enriched_Elunium + .@type$ = "armor"; mes "You have chosen an armor, meow~"; break; case 1: // Level 1 Weapon - set .@price,500; - set .@material,7620; //Enriched_Oridecon - set .@type$,"weapon"; + .@price = 500; + .@material = 7620; //Enriched_Oridecon + .@type$ = "weapon"; mes "A level 1 weapon...?"; break; case 2: // Level 2 Weapon - set .@price,2000; - set .@material,7620; //Enriched_Oridecon - set .@type$,"weapon"; + .@price = 2000; + .@material = 7620; //Enriched_Oridecon + .@type$ = "weapon"; mes "Meow, a level 2 weapon...?"; break; case 3: // Level 3 Weapon - set .@price,20000; - set .@material,7620; //Enriched_Oridecon - set .@type$,"weapon"; + .@price = 20000; + .@material = 7620; //Enriched_Oridecon + .@type$ = "weapon"; mes "Meow Meow~~ A level 3 weapon~~"; break; case 4: // Level 4 Weapon - set .@price,50000; - set .@material,7620; //Enriched_Oridecon - set .@type$,"weapon"; + .@price = 50000; + .@material = 7620; //Enriched_Oridecon + .@type$ = "weapon"; mes "Me-Meow!... A level 4 weapon...!"; mes "I've only seen it twice while"; mes "learning from Aragam... Me-Meow!!"; diff --git a/npc/re/merchants/alchemist.txt b/npc/re/merchants/alchemist.txt index ed2c0c20a..0658126ff 100644 --- a/npc/re/merchants/alchemist.txt +++ b/npc/re/merchants/alchemist.txt @@ -55,16 +55,16 @@ alde_alche,31,186,3 script Craft Book Merchant#alde 4_M_ALCHE_D,{ mes "Okay then, here's the list of available craft books."; next; switch(select("[Apple Bomb Craft Book] 100,000 zeny:[Pineapple Bomb Craft Book] 100,000 zeny:[Coconut Bomb Craft Book] 100,000 zeny:[Melon Bomb Craft Book] 100,000 zeny:[Banana Bomb Craft Book] 100,000 zeny:[Plant Gene Cultivation Method] 100,000 zeny:[Superior Potion Craft Manual] 100,000 zeny:[Mix Cooking Book] 100,000 zeny:[Health Improvement Research Book] 100,000 zeny:[Vigor Drink Recipe] 100,000 zeny:Close")){ - case 1: set .@item,6279; break; - case 2: set .@item,6280; break; - case 3: set .@item,6281; break; - case 4: set .@item,6282; break; - case 5: set .@item,6283; break; - case 6: set .@item,6284; break; - case 7: set .@item,6285; break; - case 8: set .@item,11022; break; - case 9: set .@item,11023; break; - case 10: set .@item,11024; break; + case 1: .@item = 6279; break; + case 2: .@item = 6280; break; + case 3: .@item = 6281; break; + case 4: .@item = 6282; break; + case 5: .@item = 6283; break; + case 6: .@item = 6284; break; + case 7: .@item = 6285; break; + case 8: .@item = 11022; break; + case 9: .@item = 11023; break; + case 10: .@item = 11024; break; case 11: mes "[Craft Book Merchant]"; mes "Thank you for your patronage."; @@ -92,7 +92,7 @@ alde_alche,31,186,3 script Craft Book Merchant#alde 4_M_ALCHE_D,{ mes "Would you like to continue?"; next; if (select("Yes:No") == 1) { - set .@total, .@amount * 100000; + .@total = .@amount * 100000; if (Zeny < .@total) { mes "[Craft Book Merchant]"; mes "I'm sorry, but you don't have enough money."; diff --git a/npc/re/merchants/blessed_refiner.txt b/npc/re/merchants/blessed_refiner.txt index bb5dd62d7..ec6b591a9 100644 --- a/npc/re/merchants/blessed_refiner.txt +++ b/npc/re/merchants/blessed_refiner.txt @@ -29,10 +29,10 @@ mes "How about it? Do you want to refine?"; next; setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) - set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Unequipped]")+":"; - set .@part, select(.@menu$); + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) + .@menu$ += ((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Unequipped]")+":"; + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Blacksmith Dister]"; switch(.@part) { @@ -70,42 +70,42 @@ mes "This item cannot be refined."; close; } - set .@equip_refine, getequiprefinerycnt(.@part); + .@equip_refine = getequiprefinerycnt(.@part); if (.@equip_refine < 6 || .@equip_refine > 12) { mes "[Blacksmith Dister]"; mes "This equipment has refined to "+.@equip_refine+". I only handle items with refine levels from +6 to +12!"; close; } - set .@equip_lv, getequipweaponlv(.@part); + .@equip_lv = getequipweaponlv(.@part); switch(.@equip_lv) { default: case 0: - set .@price,20000; - set .@material,6439; //Unbreakable_Def - set .@type$,"Armor"; + .@price = 20000; + .@material = 6439; //Unbreakable_Def + .@type$ = "Armor"; break; case 1: - set .@price,1000; - set .@material,6438; //Unbreakable_Weap - set .@type$,"Weapon"; + .@price = 1000; + .@material = 6438; //Unbreakable_Weap + .@type$ = "Weapon"; break; case 2: - set .@price,2000; - set .@material,6438; //Unbreakable_Weap - set .@type$,"Weapon"; + .@price = 2000; + .@material = 6438; //Unbreakable_Weap + .@type$ = "Weapon"; break; case 3: - set .@price,20000; - set .@material,6438; //Unbreakable_Weap - set .@type$,"Weapon"; + .@price = 20000; + .@material = 6438; //Unbreakable_Weap + .@type$ = "Weapon"; break; case 4: - set .@price,40000; - set .@material,6438; //Unbreakable_Weap - set .@type$,"Weapon"; + .@price = 40000; + .@material = 6438; //Unbreakable_Weap + .@type$ = "Weapon"; break; } - set .@ore$,"^ff9999Blessed "+.@type$+" Ore^000000"; + .@ore$ = "^ff9999Blessed "+.@type$+" Ore^000000"; mes "[Blacksmith Dister]"; mes "This "+.@type$+" has been refined to "+.@equip_refine+". To refine it, I need "+.@ore$+" and a "+(.@price/1000)+",000 zeny refining fee."; mes "Do you want to proceed?"; diff --git a/npc/re/merchants/card_separation.txt b/npc/re/merchants/card_separation.txt index 9954476ca..fa64db4f0 100644 --- a/npc/re/merchants/card_separation.txt +++ b/npc/re/merchants/card_separation.txt @@ -23,8 +23,8 @@ close; } if (strnpcinfo(1) == "Jeremy") { - set .@Jeremy,1; - set .@n$, "[Jeremy]"; + .@Jeremy = 1; + .@n$ = "[Jeremy]"; setarray .@equip_name$[0], "Armor", "Shoes", "Garment", "Upper Hat"; setarray .@equip_slot[0], EQI_ARMOR,EQI_SHOES,EQI_GARMENT,EQI_HEAD_TOP; @@ -32,8 +32,8 @@ mes "Long time no see~"; mes "I have learned a new skill that separates cards from Armor, Shoes, Garment and Headgear. Do you want to try it?"; } else { - set .@Jeremy,0; - set .@n$, "[Richard]"; + .@Jeremy = 0; + .@n$ = "[Richard]"; setarray .@equip_name$[0], "Left hand", "Right hand"; setarray .@equip_slot[0], EQI_HAND_L, EQI_HAND_R; @@ -48,14 +48,14 @@ mes "There is a possibility of destroying them even using a special item. Also, ^ff0000the refine level might be lost^000000. Do you have any equipment to separate?"; next; - for(set .@i,0; .@i<getarraysize(.@equip_slot); set .@i,.@i+1) { + for(.@i = 0; .@i<getarraysize(.@equip_slot); ++.@i) { if (getequipisequiped(.@equip_slot[.@i])) - set .@menu$, .@menu$+getequipname(.@equip_slot[.@i])+":"; + .@menu$ += getequipname(.@equip_slot[.@i])+":"; else - set .@menu$, .@menu$+"^999999"+.@equip_name$[.@i]+" (empty)^000000:"; + .@menu$ += "^999999"+.@equip_name$[.@i]+" (empty)^000000:"; } - set .@i, select("Stop the work:"+((.@Jeremy)?"How is it possible?":"")+":"+.@menu$); + .@i = select("Stop the work:"+((.@Jeremy)?"How is it possible?":"")+":"+.@menu$); switch(.@i) { case 1: mes .@n$; @@ -91,7 +91,7 @@ mes "I'm not sure about the quality of success. Anyway, this is so cheap, right?"; close; default: - set .@equip_num, .@equip_slot[.@i-3]; + .@equip_num = .@equip_slot[.@i-3]; if (!getequipisequiped(.@equip_num)) { mes .@n$; if (.@Jeremy) @@ -103,33 +103,40 @@ break; } - setarray .@equip_card[0], getequipcardid(.@equip_num,0),getequipcardid(.@equip_num,1),getequipcardid(.@equip_num,2),getequipcardid(.@equip_num,3); - set .@mvp_list$, - "|4408|4128|4456|4168|4142"+ //Gloom_Under_Night_Card, Golden_Bug_Card, Nidhogg_Shadow_Card, Dark_Lord_Card, Doppelganger_Card - "|4134|4137|4386|4407|4357"+ //Dracula_Card, Drake_Card, Detale_Card, Randgris_Card, B_Seyren_Card - "|4146|4132|4147|4372|4145"+ //Maya_Card, Mistress_Card, Baphomet_Card, Bacsojin_Card, Berzebub_Card - "|4374|4352|4367|4236|4425"+ //Apocalips_H_Card, B_Ygnizem_Card, B_Shecil_Card, Amon_Ra_Card, Atroce_Card - "|4359|4123|4144|4135|4143"+ //B_Eremes_Card, Eddga_Card, Osiris_Card, Orc_Load_Card, Orc_Hero_Card - "|4263|4131|4430|4276|4419"+ //Incant_Samurai_Card, Moonlight_Flower_Card, Ifrit_Card, Lord_Of_Death_Card, Ktullanux_Card - "|4403|4399|4376|4441|4302"+ //Kiel_Card, Thanatos_Card, Lady_Tanee_Card, Fallen_Bishop_Card, Tao_Gunka_Card - "|4305|4148|4318|4121|4365"+ //Turtle_General_Card, Pharaoh_Card, Knight_Windstorm_Card, Phreeoni_Card, B_Katrinn_Card - "|4363|4324|4361|4330|4342|"; //B_Magaleta_Card, Garm_Card, B_Harword_Card, Dark_Snake_Lord_Card, Rsx_0806_Card + setarray .@equip_card, getequipcardid(.@equip_num,0),getequipcardid(.@equip_num,1),getequipcardid(.@equip_num,2),getequipcardid(.@equip_num,3); + setarray .@mvp_list, Gloom_Under_Night_Card, Golden_Bug_Card, Nidhogg_Shadow_Card, Dark_Lord_Card, Doppelganger_Card, + Dracula_Card, Drake_Card, Detale_Card, Randgris_Card, B_Seyren_Card, + Maya_Card, Mistress_Card, Baphomet_Card, Bacsojin_Card, Berzebub_Card, + Apocalips_H_Card, B_Ygnizem_Card, B_Shecil_Card, Amon_Ra_Card, Atroce_Card, + B_Eremes_Card, Eddga_Card, Osiris_Card, Orc_Load_Card, Orc_Hero_Card, + Incant_Samurai_Card, Moonlight_Flower_Card, Ifrit_Card, Lord_Of_Death_Card, Ktullanux_Card, + Kiel_Card, Thanatos_Card, Lady_Tanee_Card, Fallen_Bishop_Card, Tao_Gunka_Card, + Turtle_General_Card, Pharaoh_Card, Knight_Windstorm_Card, Phreeoni_Card, B_Katrinn_Card, + B_Magaleta_Card, Garm_Card, B_Harword_Card, Dark_Snake_Lord_Card, Rsx_0806_Card; + .@boss_chk = false; if (.@Jeremy) { - for(set .@i,0; .@i<4; set .@i,.@i+1) { - if (.@equip_card[.@i] >= 4700) // Armor Enchant System - set .@equip_card[.@i],0; + .@cardcount = 4; + for (.@i = 0; .@i < 4; ++.@i) { + if (.@equip_card[.@i] >= 4700 // Armor Enchant System + || .@equip_card[.@i] == 0) { + .@equip_card[.@i] = 0; + --.@cardcount; + } } - if (!getarraysize(.@equip_card)) { + if (!.@cardcount) { mes .@n$; mes "The card is not equipped. Do you want to check again?"; close; } - if ((.@equip_card[0] && compare(.@mvp_list$,"|"+.@equip_card[0]+"|")) || - (.@equip_card[1] && compare(.@mvp_list$,"|"+.@equip_card[1]+"|")) || - (.@equip_card[2] && compare(.@mvp_list$,"|"+.@equip_card[2]+"|")) || - (.@equip_card[3] && compare(.@mvp_list$,"|"+.@equip_card[3]+"|"))) - set .@boss_chk,1; + for (.@i = 0; .@i < 4; ++.@i) { + if (.@equip_card[.@i] == 0) + continue; + for (.@j = 0; .@j < getarraysize(.@mvp_list); ++.@j) { + if (.@equip_card[.@i] == .@mvp_list[.@j]) + .@boss_chk = true; + } + } } else { // Official "Richard" script uses a hardcoded list including every possible item. //if (!getequipisequiped(.@equip_num)) { @@ -141,21 +148,21 @@ mes "[Richard]"; mes "Which number socket do you want to separate the card? From the left socket, they are sorted 1,2,3,4."; next; - set .@menu$,""; - for(set .@i,0; .@i<4; set .@i,.@i+1) { + .@menu$ = ""; + for(.@i = 0; .@i<4; ++.@i) { if (.@equip_card[.@i] && .@equip_card[.@i] < 4700) // Armor Enchant System - set .@menu$, .@menu$+"Socket "+(.@i+1)+" - "+getitemname(.@equip_card[.@i])+":"; + .@menu$ += "Socket "+(.@i+1)+" - "+getitemname(.@equip_card[.@i])+":"; else - set .@menu$, .@menu$+"^777777Socket "+(.@i+1)+" - No card^000000:"; + .@menu$ += "^777777Socket "+(.@i+1)+" - No card^000000:"; } - set .@i, select("Stop the work:"+.@menu$); + .@i = select("Stop the work:"+.@menu$); switch(.@i) { case 1: mes .@n$; mes "Whenever you need to work, please come to me."; close; default: - set .@slot, .@i-2; + .@slot = .@i-2; if (.@equip_card[.@slot] == 0 || .@equip_card[.@slot] >= 4700) { mes .@n$; mes "This socket is not equipped with any card. Why don't you check again?"; @@ -163,18 +170,19 @@ } break; } - if (compare(.@mvp_list$,"|"+.@equip_card[.@slot]+"|")) - set .@boss_chk,1; + for (.@i = 0; .@i < getarraysize(.@mvp_list); ++.@i) { + if (.@equip_card[.@slot] == .@mvp_list[.@i]) + .@boss_chk = true; + } } - if (.@boss_chk == 0) { + if (!.@boss_chk) { mes .@n$; if (.@Jeremy) mes "Except cards, ^ff0000all enchanted effects will disappear.^000000 If you agree to this, please choose the work type:"; else mes "Please choose the working fee."; next; - set .@menu$, - "Next time...:"+ + .@menu$ = "Next time...:"+ ((Zeny >= 1000000)?"Use 1,000,000z (Do not use special item):":"^999999Use 1,000,000z (Insufficient)^000000:")+ ((countitem(6441))?"Use Premium Lubricant:":"^999999Premium Lubricant (Insufficient)^000000:")+ ((countitem(6440))?"Use Ordinary Lubricant":"^999999Ordinary Lubricant (Insufficient)^000000"); @@ -197,9 +205,9 @@ mes "Whenever you need the work, visit me here."; close; } - set .@sf_c_num,150; - set .@sf_r_num,150; - set .@sf_w_num,150; + .@sf_c_num = 150; + .@sf_r_num = 150; + .@sf_w_num = 150; Zeny -= 1000000; break; case 3: @@ -216,9 +224,9 @@ mes "Whenever you need the work, visit me here."; close; } - set .@sf_c_num,75; - set .@sf_r_num,75; - set .@sf_w_num,75; + .@sf_c_num = 75; + .@sf_r_num = 75; + .@sf_w_num = 75; delitem 6441,1; //High_RankLubricant break; case 4: @@ -235,13 +243,13 @@ mes "Whenever you need the work, visit me here."; close; } - set .@sf_c_num,75; - set .@sf_r_num,150; - set .@sf_w_num,150; + .@sf_c_num = 75; + .@sf_r_num = 150; + .@sf_w_num = 150; delitem 6440,1; //General_Lubricant break; } - } else if (.@boss_chk == 1) { + } else { mes .@n$; mes "This equipment contains a precious MVP card. This card can't be separated with lubricant. If you bring the super surfactant ^0000ffSillit Pong^000000, I will be able to work."; next; @@ -261,10 +269,10 @@ mes .@n$; if (.@Jeremy) { mes "Except cards, ^ff0000all enchanted effects will disappear.^000000 If you agree to this, please choose the work type:"; - set .@menu$,"Alright, let's do it!"; + .@menu$ = "Alright, let's do it!"; } else { mes "May I continue?"; - set .@menu$,"I got it. Just do it quickly!"; + .@menu$ = "I got it. Just do it quickly!"; } next; switch(select("Next time...:"+.@menu$)) { @@ -273,45 +281,45 @@ mes "Whenever you need the work, visit me here."; close; case 2: - set .@sf_c_num,60; - set .@sf_r_num,60; - set .@sf_w_num,60; + .@sf_c_num = 60; + .@sf_r_num = 60; + .@sf_w_num = 60; delitem 6443,1; //Sillit_Pong_Bottle break; } } - set .@equip_id, getequipid(.@equip_num); - set .@equip_refine, getequiprefinerycnt(.@equip_num); + .@equip_id = getequipid(.@equip_num); + .@equip_refine = getequiprefinerycnt(.@equip_num); delequip .@equip_num; // Chance of retaining refine level. if (rand(1,.@sf_r_num) >= 61) - set .@equip_refine,0; + .@equip_refine = 0; if (.@Jeremy) { // Chance of retaining equipment. if (rand(1,.@sf_w_num) < 61) { - set .@equip_safe,1; + .@equip_safe = 1; getitem2 .@equip_id,1,1,.@equip_refine,0,0,0,0,0; } // Chance of retaining cards. - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { if (.@equip_card[.@i]) { if (rand(1,.@sf_c_num) < 61) getitem .@equip_card[.@i],1; else - set .@card_break,1; + .@card_break = 1; } } } else { - set .@card, .@equip_card[.@slot]; - set .@equip_card[.@slot],0; + .@card = .@equip_card[.@slot]; + .@equip_card[.@slot] = 0; // Chance of retaining equipment. if (rand(1,.@sf_w_num) < 61) { - set .@equip_safe,1; + .@equip_safe = 1; getitem2 .@equip_id,1,1,.@equip_refine,0,.@equip_card[0],.@equip_card[1],.@equip_card[2],.@equip_card[3]; } @@ -319,7 +327,7 @@ if (rand(1,.@sf_c_num) < 61) getitem .@card,1; else - set .@card_break,1; + .@card_break = 1; } // Display corresponding effect. diff --git a/npc/re/merchants/catalog.txt b/npc/re/merchants/catalog.txt index 3ef33e953..01793816a 100644 --- a/npc/re/merchants/catalog.txt +++ b/npc/re/merchants/catalog.txt @@ -18,7 +18,7 @@ moc_para01,22,16,5 script Catalog Magician#catal01 4_M_BIBI,{ mes "- You have too many items. Please make space. -"; close; } - set .@ticket_cost, 200; + .@ticket_cost = 200; mes "[Catalog Magician]"; mes "Look... the Magic Academy"; mes "in Geffen is now directly"; @@ -64,7 +64,7 @@ moc_para01,22,16,5 script Catalog Magician#catal01 4_M_BIBI,{ } else break; } - set .@sell, .@ticket_cost * .@input; + .@sell = .@ticket_cost * .@input; mes "The total number of catalog(s) that you're trying to purchase is " + .@input + " pieces."; mes "It costs " + .@sell + " z."; if (Zeny < .@sell) { diff --git a/npc/re/merchants/coin_exchange.txt b/npc/re/merchants/coin_exchange.txt index fb20726a3..4d69e2a61 100644 --- a/npc/re/merchants/coin_exchange.txt +++ b/npc/re/merchants/coin_exchange.txt @@ -34,22 +34,22 @@ malangdo,220,167,5 script Coin Exchanger CX-1 2_VENDING_MACHINE1,{ 6420, //Cgrade_Coin 6421, //Dgrade_Coin 6422; //Egrade_Coin - set .@menu$,"Stop:"; - for(set .@i,1; .@i<=6; set .@i,.@i+1) { + .@menu$ = "Stop:"; + for(.@i = 1; .@i<=6; ++.@i) { if (countitem(.@coins[.@i])) - set .@menu$, .@menu$+getitemname(.@coins[.@i])+":"; + .@menu$ += getitemname(.@coins[.@i])+":"; else - set .@menu$, .@menu$+"^aaaaaa"+getitemname(.@coins[.@i])+" (None)^000000:"; + .@menu$ += "^aaaaaa"+getitemname(.@coins[.@i])+" (None)^000000:"; } - set .@i, select(.@menu$); + .@i = select(.@menu$); switch(.@i) { case 1: mes "[Coin Exchanger CX-1]"; mes "Thank you for coming."; close; default: - set .@coin, .@coins[.@i-1]; - set .@coin_select, .@i-1; + .@coin = .@coins[.@i-1]; + .@coin_select = .@i-1; break; } if (countitem(.@coin) == 0) { @@ -69,17 +69,17 @@ malangdo,220,167,5 script Coin Exchanger CX-1 2_VENDING_MACHINE1,{ setarray .@exchange_rate[0],30,10; setarray .@exchange_loss[0],rand(1,4),rand(1,2); // Amount deducted per exchange. setarray .@exchange_id[0],.@coins[.@coin_select-1],.@coins[.@coin_select+1]; - if (.@exchange_id[0] == .@coins[1]) set .@exchange_id[0],0; // Cannot exchange for Silvervine. - set .@menu$,"Stop:"; - for(set .@i,0; .@i<2; set .@i,.@i+1) { + if (.@exchange_id[0] == .@coins[1]) .@exchange_id[0] = 0; // Cannot exchange for Silvervine. + .@menu$ = "Stop:"; + for(.@i = 0; .@i<2; ++.@i) { if (.@exchange_id[.@i] == 0) - set .@menu$, .@menu$+"^ff3333Unavailable exchange to "+.@exchange_name$[.@i]+" coin^000000:"; + .@menu$ += "^ff3333Unavailable exchange to "+.@exchange_name$[.@i]+" coin^000000:"; else if (countitem(.@coin) < .@exchange_rate[.@i]) - set .@menu$, .@menu$+"^aaaaaaExchange to "+.@exchange_name$[.@i]+" coin (null)^000000:"; + .@menu$ += "^aaaaaaExchange to "+.@exchange_name$[.@i]+" coin (null)^000000:"; else - set .@menu$, .@menu$+"Exchange to "+.@exchange_name$[.@i]+" coin - "+getitemname(.@coin)+" ("+.@exchange_rate[.@i]+" needed):"; + .@menu$ += "Exchange to "+.@exchange_name$[.@i]+" coin - "+getitemname(.@coin)+" ("+.@exchange_rate[.@i]+" needed):"; } - set .@i, select(.@menu$)-2; + .@i = select(.@menu$)-2; if (.@i == -1) { mes "[Coin Exchanger CX-1]"; mes "Thank you for coming."; @@ -97,7 +97,7 @@ malangdo,220,167,5 script Coin Exchanger CX-1 2_VENDING_MACHINE1,{ mes "Thank you for coming."; close; } - set .@exchange_total, .@exchange_rate[(!.@i)] - .@exchange_loss[(!.@i)]; + .@exchange_total = .@exchange_rate[(!.@i)] - .@exchange_loss[(!.@i)]; delitem .@coin, .@exchange_rate[.@i]; getitem .@exchange_id[.@i], .@exchange_total; mes "[Coin Exchanger CX-1]"; @@ -129,10 +129,10 @@ malangdo,218,165,5 script Special Vending Machine 2_DROP_MACHINE,{ "Ordinary Lubricant",6440,36, "Sillit Pong",6443,192; L_AddItem: - set .@menu$,"Explanation:"; - for(set .@i,0; .@i<getargcount(); set .@i,.@i+3) - set .@menu$, .@menu$+getarg(.@i)+":"; - set .@i, select(.@menu$)-2; + .@menu$ = "Explanation:"; + for(.@i = 0; .@i<getargcount(); .@i += 3) + .@menu$ += getarg(.@i)+":"; + .@i = select(.@menu$)-2; if (.@i == -1) { mes "[Special Vending Machine]"; mes "Seagod's Protection is an item used for entering the Culvert memorial dungeon during a certain period."; @@ -147,14 +147,14 @@ L_AddItem: mes "Sillit Pong is special item that separates sockets with MVP cards. Unable to separate MVP card by Premium and Ordinary Lubricant."; close; } - set .@cost, getarg(.@i*3+2); + .@cost = getarg(.@i*3+2); mes "[Special Vending Machine]"; mes "You choose ^005500"+getarg(.@i*3)+"^000000. For purchasing, you need ^005500"+.@cost+"^000000 unit(s) of Silvervine Fruit."; next; if (countitem(6417) < .@cost) - set .@ven_menu$, "^999999Silvervine Fruit (missing "+(.@cost - countitem(6417))+")^000000"; + .@ven_menu$ = "^999999Silvervine Fruit (missing "+(.@cost - countitem(6417))+")^000000"; else - set .@ven_menu$, "Purchase - Silvervine Fruit (have "+countitem(6417)+")"; + .@ven_menu$ = "Purchase - Silvervine Fruit (have "+countitem(6417)+")"; switch(select("Stop:"+.@ven_menu$)) { case 1: mes "[Special Vending Machine]"; @@ -191,14 +191,14 @@ malangdo,236,179,5 script Dark Merchant K 4_CAT_REST,{ next; setarray .@coin_amount[0],10,100,500,1000; while(1) { - set .@menu$,""; - for(set .@i,0; .@i<getarraysize(.@coin_amount); set .@i,.@i+1) { + .@menu$ = ""; + for(.@i = 0; .@i<getarraysize(.@coin_amount); ++.@i) { if (countitem(6420) >= .@coin_amount[.@i]) - set .@menu$, .@menu$+"Exchange "+(.@coin_amount[.@i]/10)+" Mora Coin:"; + .@menu$ += "Exchange "+(.@coin_amount[.@i]/10)+" Mora Coin:"; else - set .@menu$, .@menu$+"^aaaaaaExchange "+(.@coin_amount[.@i]/10)+" Mora Coin (Not Enough)^000000:"; + .@menu$ += "^aaaaaaExchange "+(.@coin_amount[.@i]/10)+" Mora Coin (Not Enough)^000000:"; } - set .@i, select(.@menu$+"Quit")-1; + .@i = select(.@menu$+"Quit")-1; if (.@i == getarraysize(.@coin_amount)) { mes "[Merchant K]"; mes "Let's exchange some other time."; @@ -243,23 +243,23 @@ malangdo,233,180,3 script Dark MachineTX100 2_VENDING_MACHINE1,{ 6420, //Cgrade_Coin 6421, //Dgrade_Coin 6422; //Egrade_Coin - set .@menu$,"Quit:"; - for(set .@i,1; .@i<=6; set .@i,.@i+1) { + .@menu$ = "Quit:"; + for(.@i = 1; .@i<=6; ++.@i) { if (countitem(.@coins[.@i])) - set .@menu$, .@menu$+getitemname(.@coins[.@i])+" (have "+countitem(.@coins[.@i])+"):"; + .@menu$ += getitemname(.@coins[.@i])+" (have "+countitem(.@coins[.@i])+"):"; else - set .@menu$, .@menu$+"^aaaaaa"+getitemname(.@coins[.@i])+" (None)^000000:"; + .@menu$ += "^aaaaaa"+getitemname(.@coins[.@i])+" (None)^000000:"; } - set .@i, select(.@menu$)-1; + .@i = select(.@menu$)-1; if (.@i == 0) { mes "[Dark Machine TX100]"; mes "Thank you for coming."; close; } - set .@coin, .@coins[.@i]; + .@coin = .@coins[.@i]; setarray .@exchange_name$[0],"higher","lower"; setarray .@exchange_id[0],.@coins[.@i-1],.@coins[.@i+1]; - if (.@exchange_id[0] == .@coins[1]) set .@exchange_id[0],0; // Cannot exchange for Silvervine. + if (.@exchange_id[0] == .@coins[1]) .@exchange_id[0] = 0; // Cannot exchange for Silvervine. if (.@i > getarraysize(.@coins)) { mes "[Dark Machine TX100]"; mes "You've chosen abnormal menu."; @@ -279,26 +279,26 @@ malangdo,233,180,3 script Dark MachineTX100 2_VENDING_MACHINE1,{ mes "---------------------"; mes "^ff3333We take a small vendor fee from your exchanged coins.^000000"; next; - set .@menu$, "Quit:"; + .@menu$ = "Quit:"; if (.@exchange_id[0] == 0) - set .@menu$, .@menu$+"^ff3333Cannot exchange to higher level coin^000000:"; + .@menu$ += "^ff3333Cannot exchange to higher level coin^000000:"; else { if (countitem(.@coin) >= 99) - set .@menu$, .@menu$+"Exchange 99 "+getitemname(.@coin)+" into higher level coin:"; + .@menu$ += "Exchange 99 "+getitemname(.@coin)+" into higher level coin:"; else - set .@menu$, .@menu$+"^aaaaaaExchange to higher level coin (Not enough)^000000:"; + .@menu$ += "^aaaaaaExchange to higher level coin (Not enough)^000000:"; } if (.@exchange_id[1] == 0) - set .@menu$, .@menu$+"^ff3333Cannot exchange to lower level coin^000000:"; + .@menu$ += "^ff3333Cannot exchange to lower level coin^000000:"; else { if (countitem(.@coin) > 500) - set .@menu$, .@menu$+"Exchange 500 "+getitemname(.@coin)+" into lower level coin:"; + .@menu$ += "Exchange 500 "+getitemname(.@coin)+" into lower level coin:"; else if (countitem(.@coin)) - set .@menu$, .@menu$+"Exchange "+countitem(.@coin)+" "+getitemname(.@coin)+" into lower level coin:"; + .@menu$ += "Exchange "+countitem(.@coin)+" "+getitemname(.@coin)+" into lower level coin:"; else - set .@menu$, .@menu$+"^aaaaaaExchange to lower level coin (Not enough)^000000:"; + .@menu$ += "^aaaaaaExchange to lower level coin (Not enough)^000000:"; } - set .@i, select(.@menu$)-2; + .@i = select(.@menu$)-2; if (.@i == -1) { mes "[Dark Machine TX100]"; mes "Thank you for coming."; @@ -323,17 +323,17 @@ malangdo,233,180,3 script Dark MachineTX100 2_VENDING_MACHINE1,{ } switch(.@i) { case 0: - set .@payment_amount,99; - set .@reward_amount, .@payment_amount/3; - set .@coin_text$,"High"; + .@payment_amount = 99; + .@reward_amount = .@payment_amount/3; + .@coin_text$ = "High"; break; case 1: - set .@payment_amount,(((countitem(.@coin) > 500))?500:countitem(.@coin)); - set .@reward_amount, .@payment_amount*3; - set .@coin_text$,"Low"; + .@payment_amount = (((countitem(.@coin) > 500))?500:countitem(.@coin)); + .@reward_amount = .@payment_amount*3; + .@coin_text$ = "Low"; break; } - set .@fee, rand(1,3); + .@fee = rand(1,3); delitem .@coin, .@payment_amount; getitem .@exchange_id[.@i], .@reward_amount - .@fee; mes "[Dark Machine TX100]"; @@ -389,20 +389,20 @@ malangdo,175,145,4 script Can Agency Guard 4_CAT_MERMASTER,{ mes "Umm, I'm not here forever, so come to me if you'd like to exchange while I still am."; close; case 2: - set .@check,1; - set .@count,1; + .@check = 1; + .@count = 1; break; case 3: - set .@check,10; - set .@count,10; + .@check = 10; + .@count = 10; break; case 4: - set .@check,100; - set .@count,100; + .@check = 100; + .@count = 100; break; case 5: - set .@check,1; - set .@count,countitem(12633); + .@check = 1; + .@count = countitem(12633); break; } if (countitem(12633) < .@check) { @@ -501,16 +501,16 @@ function script F_mal_coin { mes "The price of ^0000FF["+getarg(2)+"]^000000 is"; if (getarg(4) && getarg(5)) { // Type 1: Egrade_Coin or Malang_Sp_Can mes getarg(4)+" E Grade Coin or "+getarg(5)+" Malangdo Canned Specialties."; - set .@type,1; - set .@menu$,"Yes.:No, I'll purchase with cans.:I don't want to purchase any."; + .@type = 1; + .@menu$ = "Yes.:No, I'll purchase with cans.:I don't want to purchase any."; } else if (getarg(5)) { // Type 2: Malang_Sp_Can only mes getarg(5)+" Malangdo Canned Specialties."; - set .@type,2; - set .@menu$,"Yes.::No."; + .@type = 2; + .@menu$ = "Yes.::No."; } else { // Type 3: Silvervine only mes getarg(6)+" Silvervine Fruit."; - set .@type,3; - set .@menu$,"Yes.::I don't want to purchase any."; + .@type = 3; + .@menu$ = "Yes.::I don't want to purchase any."; } next; mes getarg(1); @@ -524,23 +524,23 @@ function script F_mal_coin { next; switch(select(.@menu$)) { case 2: - set .@type,2; + .@type = 2; case 1: switch(.@type) { case 1: - set .@item,6422; //Egrade_Coin - set .@amount,getarg(4); - set .@str$,"coins"; + .@item = 6422; //Egrade_Coin + .@amount = getarg(4); + .@str$ = "coins"; break; case 2: - set .@item,12636; //Malang_Sp_Can - set .@amount,getarg(5); - set .@str$,"cans"; + .@item = 12636; //Malang_Sp_Can + .@amount = getarg(5); + .@str$ = "cans"; break; case 3: - set .@item,6417; //Silvervine - set .@amount,getarg(6); - set .@str$,"Silvervine Fruit"; + .@item = 6417; //Silvervine + .@amount = getarg(6); + .@str$ = "Silvervine Fruit"; break; } if (countitem(.@item) < .@amount) { @@ -576,7 +576,7 @@ malangdo,162,146,5 script Wandering Merchant#mal 4_M_MERCAT1,{ "Spearfish","Tuna","Hairtail","Saurel","Malang Snow Crab","Brindle Eel", "Hairtail (7Days)","Spearfish (7Days)","Saurel (7Days)","Tuna (7Days)","Brindle Eel (7Days)","Malang Snow Crab (7Days)"; while(1) { - set .@i, select( + .@i = select( "[Spearfish(1hr)] 8 E-Coins/50 Cans", "[Tuna(1hr)] 8 E-Coins/50 Cans", "[Hairtail(1hr)] 8 E-Coins/50 Cans", @@ -703,7 +703,7 @@ malangdo,173,145,4 script Stinky Merchant 4_M_MERCAT2,{ setarray .@items[1],2873,16015; setarray .@names$[1],"Cat Hand Glove","Cat Club"; while(1) { - set .@i, select( + .@i = select( "[Cat Hand Glove] 32 E-Coins/200 Cans", "[Cat Club] 32 E-Coins/200 Cans", "End purchasing." @@ -754,7 +754,7 @@ malangdo,150,135,5 script Roving Merchant 4_M_MERCAT1,{ setarray .@items[1],12639,12637,12638,12640; setarray .@names$[1],"Flying Fish","Sow Bug","Dried Squid","Starfish"; while(1) { - set .@i, select( + .@i = select( "[Flying Fish] 200 Cans", "[Sow Bug] 200 Cans", "[Dried Squid] 200 Cans", @@ -832,7 +832,7 @@ ecl_in01,66,95,2 script Armor Merchant Naphara 4_F_FAIRYKID,{ mes "Hello, this is Naphara's store, a place of high class goods."; mes "What would you need?"; next; - set .@i, select("Str Glove:Int Glove:Agi Glove:Vit Glove:Dex Glove:Luk Glove"); + .@i = select("Str Glove:Int Glove:Agi Glove:Vit Glove:Dex Glove:Luk Glove"); mes "[Armor Merchant]"; switch(.@i) { case 1: // Str Glove @@ -840,42 +840,42 @@ ecl_in01,66,95,2 script Armor Merchant Naphara 4_F_FAIRYKID,{ mes "^3131FFMHP + 100, MSP + 20^000000"; mes "^3131FFATK+1 increases for every STR+10^000000"; mes "^3131FFATK +1% added above STR 110^000000"; - set .@item,2917; //Str_Glove + .@item = 2917; //Str_Glove break; case 2: mes "^3131FFInt Glove^000000"; mes "^3131FFMHP + 100, MSP + 20^000000"; mes "^3131FFMATK+1 increases for every INT+10^000000"; mes "^3131FFMATK +1% added above INT 110^000000"; - set .@item,2918; //Int_Glove + .@item = 2918; //Int_Glove break; case 3: mes "^3131FFAgi Glove^000000"; mes "^3131FFMHP + 100, MSP + 20^000000"; mes "^3131FFFLEE+1 increases for every AGI+10^000000"; mes "^3131FFComplete Flee +1 added above AGI 110^000000"; - set .@item,2919; //Agi_Glove + .@item = 2919; //Agi_Glove break; case 4: mes "^3131FFVit Glove^000000"; mes "^3131FFMHP + 100, MSP + 20^000000"; mes "^3131FFMHP+50 for every VIT+10^000000"; mes "^3131FFMHP+1% added above VIT 110^000000"; - set .@item,2920; //Vit_Glove + .@item = 2920; //Vit_Glove break; case 5: mes "^3131FFDex Glove^000000"; mes "^3131FFMHP + 100, MSP + 20^000000"; mes "^3131FFHIT+1 increases for every DEX+10^000000"; mes "^3131FFRanged attack power +1% added above DEX 110^000000"; - set .@item,2921; //Dex_Glove + .@item = 2921; //Dex_Glove break; case 6: mes "^3131FFLuk Glove^000000"; mes "^3131FFMHP + 100, MSP + 20^000000"; mes "^3131FFCRI+1 increases for every LUK+10^000000"; mes "^3131FFCritical damage +1% added above LUK 110^000000"; - set .@item,2922; //Luk_Glove + .@item = 2922; //Luk_Glove break; } mes "^3131FFRequired Level: 100^000000"; @@ -921,9 +921,9 @@ ecl_in01,64,97,4 script Slot Expert Nattuer#ecl 4_F_FAIRYKID,{ next; setarray .@noslots[0],2917,2918,2919,2920,2921,2922; setarray .@slotted[0],2923,2924,2925,2926,2927,2928; - set .@i, select("Str Glove:Int Glove:Ag Glove:Vit Glove:Dex Glove:Luk Glove")-1; - set .@item, .@noslots[.@i]; - set .@new_item, .@slotted[.@i]; + .@i = select("Str Glove:Int Glove:Ag Glove:Vit Glove:Dex Glove:Luk Glove")-1; + .@item = .@noslots[.@i]; + .@new_item = .@slotted[.@i]; mes "[Slot Expert]"; mes "Let's confirm for the last time. Is the one you want "+getitemname(.@item)+"?"; next; @@ -1063,16 +1063,16 @@ ecl_in01,67,39,4 script Replication Expert Palt 4_M_FAIRYKID4,{ 0, //-- not implemented? -- 19545; //C_Boys_Cap if (countitem(6081) >= 50 && countitem(747) >= 4 && countitem(6395) >= 1 && countitem(721) >= 10 && countitem(723) >= 10 && countitem(726) >= 10 && countitem(728) >= 10 && countitem(729) >= 10) - set .@item_check,1; - for(set .@i,0; .@i<getarraysize(.@items); set .@i,.@i+1) { + .@item_check = 1; + for(.@i = 0; .@i<getarraysize(.@items); ++.@i) { if (.@item_check && countitem(.@items[.@i])) - set .@menu$, .@menu$+getitemname(.@items[.@i])+":"; //custom + .@menu$ += getitemname(.@items[.@i])+":"; //custom else - set .@menu$, .@menu$+getitemname(.@items[.@i])+" (^777777Insufficient ingredients^000000):"; + .@menu$ += getitemname(.@items[.@i])+" (^777777Insufficient ingredients^000000):"; } - set .@i, select(.@menu$)-1; - set .@item, .@items[.@i]; - set .@new_item, .@costumes[.@i]; + .@i = select(.@menu$)-1; + .@item = .@items[.@i]; + .@new_item = .@costumes[.@i]; mes "[Paltu]"; mes "Is ^0571B0"+getitemname(.@item)+"^000000 what you wanted?"; next; @@ -1115,26 +1115,26 @@ ecl_in01,33,98,4 script Herb Merchant Plafina#e 4_M_FAIRYKID2,{ case 1: mes "[Herb Merchant]"; mes "Snow Flip has special effects on ^3131FFBurning, Bleeding, Deep Sleep, Sleep^000000."; - set .@item,12812; //Snow_Flip - set .@cost,5; + .@item = 12812; //Snow_Flip + .@cost = 5; break; case 2: mes "[Herb Merchant]"; mes "Peony Mamy has special effects on ^3131FFFrost, Frozen, Freezing^000000."; - set .@item,12813; //Peony_Mommy - set .@cost,5; + .@item = 12813; //Peony_Mommy + .@cost = 5; break; case 3: mes "[Herb Merchant]"; mes "Slapping Herb has special effects on ^3131FFStun, Fear, Chaos, Hallucination^000000."; - set .@item,12814; //Slapping_Herb - set .@cost,1; + .@item = 12814; //Slapping_Herb + .@cost = 1; break; case 4: mes "[Herb Merchant]"; mes "Yggdrasil Dust has special effects on ^3131FFBlind, Curse, Decrease Agility, Reverse Orcish^000000."; - set .@item,12815; //Yggdrasil_Dust - set .@cost,1; + .@item = 12815; //Yggdrasil_Dust + .@cost = 1; break; case 5: mes "[Herb Merchant]"; @@ -1146,15 +1146,15 @@ ecl_in01,33,98,4 script Herb Merchant Plafina#e 4_M_FAIRYKID2,{ next; switch(select("Buy 1.:Buy 10.:Don't buy.")) { case 1: - set .@amount,1; + .@amount = 1; break; case 2: - set .@amount,10; + .@amount = 10; break; case 3: close; } - set .@price,.@amount*.@cost; + .@price = .@amount*.@cost; mes "[Herb Merchant]"; mes "Would you like to buy "+.@amount+" "+getitemname(.@item)+"?"; next; diff --git a/npc/re/merchants/diamond.txt b/npc/re/merchants/diamond.txt index eda1740ca..80fcb88de 100644 --- a/npc/re/merchants/diamond.txt +++ b/npc/re/merchants/diamond.txt @@ -18,7 +18,7 @@ - script RareDiamondMerchant 1_M_MERCHANT,{ - set .@npc$, "[Rare Diamond Merchant]"; + .@npc$ = "[Rare Diamond Merchant]"; mes .@npc$; mes "Ladies and Gentlemen! ! !"; @@ -47,9 +47,9 @@ mes "It is the ^FF82FF'17 Carat Diamond'^000000!"; next; - set .@menu$, "^FF82FF'17 Carat Diamond'^000000?"; + .@menu$ = "^FF82FF'17 Carat Diamond'^000000?"; if (countitem(6024)) - set .@menu$, .@menu$ + ":Exchange my 17 Carat Diamond for zeny..."; + .@menu$ += ":Exchange my 17 Carat Diamond for zeny..."; switch(select(.@menu$)) { case 1: diff --git a/npc/re/merchants/enchan_mal.txt b/npc/re/merchants/enchan_mal.txt index 24ed71c04..6dbb264df 100644 --- a/npc/re/merchants/enchan_mal.txt +++ b/npc/re/merchants/enchan_mal.txt @@ -49,21 +49,21 @@ malangdo,213,167,4 script Mayomayo#mal 4_CAT_3COLOR,{ mes "Several rules are changed. Well, you better have experience."; close; case 2: - set @mal_enchant_select,1; + @mal_enchant_select = 1; break; case 3: - set @mal_enchant_select,2; + @mal_enchant_select = 2; break; } if (!getequipisequiped(EQI_HAND_R)) { mes "[Mayomayo]"; mes "Did you take off your equipment?"; - set @mal_enchant_select,0; + @mal_enchant_select = 0; close; } - set @mal_equip_id, getequipid(EQI_HAND_R); - set .@equip_type, getiteminfo(@mal_equip_id,11); + @mal_equip_id = getequipid(EQI_HAND_R); + .@equip_type = getiteminfo(@mal_equip_id,11); //callsub L_Socket,<cost multiplier>,<4-x enchants possible>; switch(.@equip_type) { // Check weapon type first to speed up the checks. @@ -306,18 +306,18 @@ malangdo,213,167,4 script Mayomayo#mal 4_CAT_3COLOR,{ mes "This is not a suitable equipment for the enchant. Don't forget we only take care of high class weapons, including level 4 weapons~"; else mes "This equipment can not be initialized. Don't forget we only handle some luxury weapons, including level 4 weapons~"; - set @mal_equip_id,0; - set @mal_enchant_select,0; + @mal_equip_id = 0; + @mal_enchant_select = 0; close; L_Socket: - set .@select, @mal_enchant_select; - set .@equip_id, @mal_equip_id; - set .@equip_name$, getitemname(.@equip_id)+((getitemslots(.@equip_id))?"["+getitemslots(.@equip_id)+"]":""); - set .@equip_refine, getequiprefinerycnt(EQI_HAND_R); + .@select = @mal_enchant_select; + .@equip_id = @mal_equip_id; + .@equip_name$ = getitemname(.@equip_id)+((getitemslots(.@equip_id))?"["+getitemslots(.@equip_id)+"]":""); + .@equip_refine = getequiprefinerycnt(EQI_HAND_R); setarray .@equip_card[0], getequipcardid(EQI_HAND_R,0),getequipcardid(EQI_HAND_R,1),getequipcardid(EQI_HAND_R,2),getequipcardid(EQI_HAND_R,3); - set @mal_equip_id,0; - set @mal_enchant_select,0; + @mal_equip_id = 0; + @mal_enchant_select = 0; if (.@select == 1) { mes "[Mayomayo]"; @@ -327,16 +327,16 @@ L_Socket: setarray .@coin[0],6422,6421,6420,6419,6418,6423; // Payment ID setarray .@cost[0], 15, 10, 6, 3, 2, 1; // Payment multiplier - set .@menu$, "Stop:"; - for(set .@i,0; .@i<getarraysize(.@coin); set .@i,.@i+1) { - set .@count[.@i], countitem(.@coin[.@i]); - set .@total[.@i], getarg(0)*.@cost[.@i]; + .@menu$ = "Stop:"; + for(.@i = 0; .@i<getarraysize(.@coin); ++.@i) { + .@count[.@i] = countitem(.@coin[.@i]); + .@total[.@i] = getarg(0)*.@cost[.@i]; if (.@count[.@i] < .@total[.@i]) - set .@menu$, .@menu$+"^999999"+getitemname(.@coin[.@i])+" (missing "+(.@total[.@i]-.@count[.@i])+")^000000:"; + .@menu$ += "^999999"+getitemname(.@coin[.@i])+" (missing "+(.@total[.@i]-.@count[.@i])+")^000000:"; else - set .@menu$, .@menu$+getitemname(.@coin[.@i])+" (have "+.@count[.@i]+", need "+.@total[.@i]+"):"; + .@menu$ += getitemname(.@coin[.@i])+" (have "+.@count[.@i]+", need "+.@total[.@i]+"):"; } - set .@coin_select, select(.@menu$)-2; + .@coin_select = select(.@menu$)-2; if (.@coin_select == -1) { mes "[Mayomayo]"; mes "Come back again if you change your mind."; @@ -348,16 +348,16 @@ L_Socket: } switch(.@coin_select) { case 0: //Egrade_Coin - set .@enchant_type,10; + .@enchant_type = 10; break; case 1: //Dgrade_Coin - set .@enchant_type,9; + .@enchant_type = 9; break; case 2: //Cgrade_Coin - set .@enchant_type,8; + .@enchant_type = 8; break; case 3: //Bgrade_Coin - set .@enchant_type,7; + .@enchant_type = 7; break; case 4: //Agrade_Coin case 5: //Anger_Seagod @@ -370,23 +370,23 @@ L_Socket: mes "Ok. If you change your mind, let me know."; close; case 2: - set .@enchant_type,((.@coin_select == 4)?4:1); + .@enchant_type = ((.@coin_select == 4)?4:1); break; case 3: - set .@enchant_type,((.@coin_select == 4)?5:2); + .@enchant_type = ((.@coin_select == 4)?5:2); break; case 4: - set .@enchant_type,((.@coin_select == 4)?6:3); + .@enchant_type = ((.@coin_select == 4)?6:3); break; } break; } if (.@equip_card[3] == 0 && getarg(1) < 4) { - set .@socket,4; - set .@str$,"1st"; + .@socket = 4; + .@str$ = "1st"; } else if (.@equip_card[2] == 0 && getarg(1) < 3) { - set .@socket,3; - set .@str$,"2nd"; + .@socket = 3; + .@str$ = "2nd"; } else { mes "[Mayomayo]"; mes "This equipment is at the end of enchant. Please initialize the enchant and you will be able to enchant it again, or bring another weapon."; @@ -402,174 +402,174 @@ L_Socket: } switch(.@enchant_type) { case 10: //Egrade_Coin - set .@i, rand(1,531); - if (.@i < 101) set .@enchant,4787; //Mdef4 - else if (.@i < 201) set .@enchant,4792; //Def6 - else if (.@i < 301) set .@enchant,4801; //SP100 - else if (.@i < 351) set .@enchant,4795; //HP100 - else if (.@i < 401) set .@enchant,4796; //HP200 - else if (.@i < 451) set .@enchant,4819; //Atk1 - else if (.@i < 476) set .@enchant,4720; //Dexterity1 - else if (.@i < 501) set .@enchant,4740; //Vitality1 - else if (.@i < 526) set .@enchant,4750; //Luck1 - else if (.@i < 528) set .@enchant,4700; //Strength1 - else if (.@i < 530) set .@enchant,4730; //Agility1 - else if (.@i < 532) set .@enchant,4710; //Inteligence1 - else set .@enchant,9; + .@i = rand(1,531); + if (.@i < 101) .@enchant = 4787; //Mdef4 + else if (.@i < 201) .@enchant = 4792; //Def6 + else if (.@i < 301) .@enchant = 4801; //SP100 + else if (.@i < 351) .@enchant = 4795; //HP100 + else if (.@i < 401) .@enchant = 4796; //HP200 + else if (.@i < 451) .@enchant = 4819; //Atk1 + else if (.@i < 476) .@enchant = 4720; //Dexterity1 + else if (.@i < 501) .@enchant = 4740; //Vitality1 + else if (.@i < 526) .@enchant = 4750; //Luck1 + else if (.@i < 528) .@enchant = 4700; //Strength1 + else if (.@i < 530) .@enchant = 4730; //Agility1 + else if (.@i < 532) .@enchant = 4710; //Inteligence1 + else .@enchant = 9; break; case 9: //Dgrade_Coin - set .@i, rand(1,531); - if (.@i < 101) set .@enchant,4795; //HP100 - else if (.@i < 201) set .@enchant,4796; //HP200 - else if (.@i < 301) set .@enchant,4819; //Atk1 - else if (.@i < 351) set .@enchant,4720; //Dexterity1 - else if (.@i < 401) set .@enchant,4740; //Vitality1 - else if (.@i < 451) set .@enchant,4750; //Luck1 - else if (.@i < 476) set .@enchant,4700; //Strength1 - else if (.@i < 501) set .@enchant,4730; //Agility1 - else if (.@i < 526) set .@enchant,4710; //Inteligence1 - else if (.@i < 528) set .@enchant,4701; //Strength2 - else if (.@i < 530) set .@enchant,4731; //Agility2 - else if (.@i < 532) set .@enchant,4711; //Inteligence2 - else set .@enchant,9; + .@i = rand(1,531); + if (.@i < 101) .@enchant = 4795; //HP100 + else if (.@i < 201) .@enchant = 4796; //HP200 + else if (.@i < 301) .@enchant = 4819; //Atk1 + else if (.@i < 351) .@enchant = 4720; //Dexterity1 + else if (.@i < 401) .@enchant = 4740; //Vitality1 + else if (.@i < 451) .@enchant = 4750; //Luck1 + else if (.@i < 476) .@enchant = 4700; //Strength1 + else if (.@i < 501) .@enchant = 4730; //Agility1 + else if (.@i < 526) .@enchant = 4710; //Inteligence1 + else if (.@i < 528) .@enchant = 4701; //Strength2 + else if (.@i < 530) .@enchant = 4731; //Agility2 + else if (.@i < 532) .@enchant = 4711; //Inteligence2 + else .@enchant = 9; break; case 8: //Cgrade_Coin - set .@i, rand(1,531); - if (.@i < 101) set .@enchant,4720; //Dexterity1 - else if (.@i < 201) set .@enchant,4740; //Vitality1 - else if (.@i < 301) set .@enchant,4750; //Luck1 - else if (.@i < 351) set .@enchant,4700; //Strength1 - else if (.@i < 401) set .@enchant,4730; //Agility1 - else if (.@i < 451) set .@enchant,4710; //Inteligence1 - else if (.@i < 476) set .@enchant,4701; //Strength2 - else if (.@i < 501) set .@enchant,4731; //Agility2 - else if (.@i < 526) set .@enchant,4711; //Inteligence2 - else if (.@i < 528) set .@enchant,4702; //Strength3 - else if (.@i < 530) set .@enchant,4732; //Agility3 - else if (.@i < 532) set .@enchant,4712; //Inteligence3 - else set .@enchant,9; + .@i = rand(1,531); + if (.@i < 101) .@enchant = 4720; //Dexterity1 + else if (.@i < 201) .@enchant = 4740; //Vitality1 + else if (.@i < 301) .@enchant = 4750; //Luck1 + else if (.@i < 351) .@enchant = 4700; //Strength1 + else if (.@i < 401) .@enchant = 4730; //Agility1 + else if (.@i < 451) .@enchant = 4710; //Inteligence1 + else if (.@i < 476) .@enchant = 4701; //Strength2 + else if (.@i < 501) .@enchant = 4731; //Agility2 + else if (.@i < 526) .@enchant = 4711; //Inteligence2 + else if (.@i < 528) .@enchant = 4702; //Strength3 + else if (.@i < 530) .@enchant = 4732; //Agility3 + else if (.@i < 532) .@enchant = 4712; //Inteligence3 + else .@enchant = 9; break; case 7: //Bgrade_Coin - set .@i, rand(1,531); - if (.@i < 101) set .@enchant,4700; //Strength1 - else if (.@i < 201) set .@enchant,4730; //Agility1 - else if (.@i < 301) set .@enchant,4710; //Inteligence1 - else if (.@i < 351) set .@enchant,4701; //Strength2 - else if (.@i < 401) set .@enchant,4731; //Agility2 - else if (.@i < 451) set .@enchant,4711; //Inteligence2 - else if (.@i < 476) set .@enchant,4702; //Strength3 - else if (.@i < 501) set .@enchant,4732; //Agility3 - else if (.@i < 526) set .@enchant,4712; //Inteligence3 - else if (.@i < 528) set .@enchant,4703; //Strength4 - else if (.@i < 530) set .@enchant,4733; //Agility4 - else if (.@i < 532) set .@enchant,4713; //Inteligence4 - else set .@enchant,9; + .@i = rand(1,531); + if (.@i < 101) .@enchant = 4700; //Strength1 + else if (.@i < 201) .@enchant = 4730; //Agility1 + else if (.@i < 301) .@enchant = 4710; //Inteligence1 + else if (.@i < 351) .@enchant = 4701; //Strength2 + else if (.@i < 401) .@enchant = 4731; //Agility2 + else if (.@i < 451) .@enchant = 4711; //Inteligence2 + else if (.@i < 476) .@enchant = 4702; //Strength3 + else if (.@i < 501) .@enchant = 4732; //Agility3 + else if (.@i < 526) .@enchant = 4712; //Inteligence3 + else if (.@i < 528) .@enchant = 4703; //Strength4 + else if (.@i < 530) .@enchant = 4733; //Agility4 + else if (.@i < 532) .@enchant = 4713; //Inteligence4 + else .@enchant = 9; break; case 6: //Agrade_Coin - Caster - set .@i, rand(1,555); - if (.@i < 81) set .@enchant,4711; //Inteligence2 - else if (.@i < 161) set .@enchant,4721; //Dexterity2 - else if (.@i < 241) set .@enchant,4814; //Spell2 - else if (.@i < 311) set .@enchant,4712; //Inteligence3 - else if (.@i < 371) set .@enchant,4722; //Dexterity3 - else if (.@i < 431) set .@enchant,4813; //Spell3 - else if (.@i < 476) set .@enchant,4713; //Inteligence4 - else if (.@i < 516) set .@enchant,4812; //Spell4 - else if (.@i < 526) set .@enchant,4760; //Matk1 - else if (.@i < 546) set .@enchant,4714; //Inteligence5 - else if (.@i < 551) set .@enchant,4826; //Spell5 - else if (.@i < 556) set .@enchant,4761; //Matk2 - else set .@enchant,9; + .@i = rand(1,555); + if (.@i < 81) .@enchant = 4711; //Inteligence2 + else if (.@i < 161) .@enchant = 4721; //Dexterity2 + else if (.@i < 241) .@enchant = 4814; //Spell2 + else if (.@i < 311) .@enchant = 4712; //Inteligence3 + else if (.@i < 371) .@enchant = 4722; //Dexterity3 + else if (.@i < 431) .@enchant = 4813; //Spell3 + else if (.@i < 476) .@enchant = 4713; //Inteligence4 + else if (.@i < 516) .@enchant = 4812; //Spell4 + else if (.@i < 526) .@enchant = 4760; //Matk1 + else if (.@i < 546) .@enchant = 4714; //Inteligence5 + else if (.@i < 551) .@enchant = 4826; //Spell5 + else if (.@i < 556) .@enchant = 4761; //Matk2 + else .@enchant = 9; break; case 5: //Agrade_Coin - Long Range - set .@i, rand(1,555); - if (.@i < 81) set .@enchant,4731; //Agility2 - else if (.@i < 161) set .@enchant,4833; //Expert_Archer2 - else if (.@i < 241) set .@enchant,4817; //Sharp2 - else if (.@i < 311) set .@enchant,4732; //Agility3 - else if (.@i < 371) set .@enchant,4834; //Expert_Archer3 - else if (.@i < 431) set .@enchant,4816; //Sharp3 - else if (.@i < 476) set .@enchant,4733; //Agility4 - else if (.@i < 516) set .@enchant,4835; //Expert_Archer4 - else if (.@i < 526) set .@enchant,4807; //Atk_Speed1 - else if (.@i < 546) set .@enchant,4734; //Agility5 - else if (.@i < 551) set .@enchant,4836; //Expert_Archer5 - else if (.@i < 556) set .@enchant,4807; //Atk_Speed1 - else set .@enchant,9; + .@i = rand(1,555); + if (.@i < 81) .@enchant = 4731; //Agility2 + else if (.@i < 161) .@enchant = 4833; //Expert_Archer2 + else if (.@i < 241) .@enchant = 4817; //Sharp2 + else if (.@i < 311) .@enchant = 4732; //Agility3 + else if (.@i < 371) .@enchant = 4834; //Expert_Archer3 + else if (.@i < 431) .@enchant = 4816; //Sharp3 + else if (.@i < 476) .@enchant = 4733; //Agility4 + else if (.@i < 516) .@enchant = 4835; //Expert_Archer4 + else if (.@i < 526) .@enchant = 4807; //Atk_Speed1 + else if (.@i < 546) .@enchant = 4734; //Agility5 + else if (.@i < 551) .@enchant = 4836; //Expert_Archer5 + else if (.@i < 556) .@enchant = 4807; //Atk_Speed1 + else .@enchant = 9; break; case 4: //Agrade_Coin - Short Range - set .@i, rand(1,555); - if (.@i < 81) set .@enchant,4731; //Agility2 - else if (.@i < 161) set .@enchant,4808; //Fighting_Spirit4 - else if (.@i < 241) set .@enchant,4817; //Sharp2 - else if (.@i < 311) set .@enchant,4732; //Agility3 - else if (.@i < 371) set .@enchant,4820; //Fighting_Spirit5 - else if (.@i < 431) set .@enchant,4816; //Sharp3 - else if (.@i < 476) set .@enchant,4733; //Agility4 - else if (.@i < 516) set .@enchant,4821; //Fighting_Spirit6 - else if (.@i < 526) set .@enchant,4807; //Atk_Speed1 - else if (.@i < 546) set .@enchant,4734; //Agility5 - else if (.@i < 551) set .@enchant,4822; //Fighting_Spirit7 - else if (.@i < 556) set .@enchant,4807; //Atk_Speed1 - else set .@enchant,9; + .@i = rand(1,555); + if (.@i < 81) .@enchant = 4731; //Agility2 + else if (.@i < 161) .@enchant = 4808; //Fighting_Spirit4 + else if (.@i < 241) .@enchant = 4817; //Sharp2 + else if (.@i < 311) .@enchant = 4732; //Agility3 + else if (.@i < 371) .@enchant = 4820; //Fighting_Spirit5 + else if (.@i < 431) .@enchant = 4816; //Sharp3 + else if (.@i < 476) .@enchant = 4733; //Agility4 + else if (.@i < 516) .@enchant = 4821; //Fighting_Spirit6 + else if (.@i < 526) .@enchant = 4807; //Atk_Speed1 + else if (.@i < 546) .@enchant = 4734; //Agility5 + else if (.@i < 551) .@enchant = 4822; //Fighting_Spirit7 + else if (.@i < 556) .@enchant = 4807; //Atk_Speed1 + else .@enchant = 9; break; case 3: //Anger_Seagod - Caster - set .@i, rand(1,555); - if (.@i < 81) set .@enchant,4712; //Inteligence3 - else if (.@i < 161) set .@enchant,4722; //Dexterity3 - else if (.@i < 241) set .@enchant,4813; //Spell3 - else if (.@i < 311) set .@enchant,4713; //Inteligence4 - else if (.@i < 371) set .@enchant,4812; //Spell4 - else if (.@i < 431) set .@enchant,4760; //Matk1 - else if (.@i < 476) set .@enchant,4714; //Inteligence5 - else if (.@i < 516) set .@enchant,4826; //Spell5 - else if (.@i < 526) set .@enchant,4761; //Matk2 - else if (.@i < 546) set .@enchant,4715; //Inteligence6 - else if (.@i < 551) set .@enchant,4827; //Spell6 - else if (.@i < 556) set .@enchant,4761; //Matk2 - else set .@enchant,9; + .@i = rand(1,555); + if (.@i < 81) .@enchant = 4712; //Inteligence3 + else if (.@i < 161) .@enchant = 4722; //Dexterity3 + else if (.@i < 241) .@enchant = 4813; //Spell3 + else if (.@i < 311) .@enchant = 4713; //Inteligence4 + else if (.@i < 371) .@enchant = 4812; //Spell4 + else if (.@i < 431) .@enchant = 4760; //Matk1 + else if (.@i < 476) .@enchant = 4714; //Inteligence5 + else if (.@i < 516) .@enchant = 4826; //Spell5 + else if (.@i < 526) .@enchant = 4761; //Matk2 + else if (.@i < 546) .@enchant = 4715; //Inteligence6 + else if (.@i < 551) .@enchant = 4827; //Spell6 + else if (.@i < 556) .@enchant = 4761; //Matk2 + else .@enchant = 9; break; case 2: //Anger_Seagod - Long Range - set .@i, rand(1,555); - if (.@i < 81) set .@enchant,4732; //Agility3 - else if (.@i < 161) set .@enchant,4834; //Expert_Archer3 - else if (.@i < 241) set .@enchant,4843; //Sharp4 - else if (.@i < 311) set .@enchant,4733; //Agility4 - else if (.@i < 371) set .@enchant,4835; //Expert_Archer4 - else if (.@i < 431) set .@enchant,4844; //Sharp5 - else if (.@i < 476) set .@enchant,4734; //Agility5 - else if (.@i < 516) set .@enchant,4836; //Expert_Archer5 - else if (.@i < 526) set .@enchant,4807; //Atk_Speed1 - else if (.@i < 546) set .@enchant,4735; //Agility6 - else if (.@i < 551) set .@enchant,4837; //Expert_Archer6 - else if (.@i < 556) set .@enchant,4807; //Atk_Speed1 - else set .@enchant,9; + .@i = rand(1,555); + if (.@i < 81) .@enchant = 4732; //Agility3 + else if (.@i < 161) .@enchant = 4834; //Expert_Archer3 + else if (.@i < 241) .@enchant = 4843; //Sharp4 + else if (.@i < 311) .@enchant = 4733; //Agility4 + else if (.@i < 371) .@enchant = 4835; //Expert_Archer4 + else if (.@i < 431) .@enchant = 4844; //Sharp5 + else if (.@i < 476) .@enchant = 4734; //Agility5 + else if (.@i < 516) .@enchant = 4836; //Expert_Archer5 + else if (.@i < 526) .@enchant = 4807; //Atk_Speed1 + else if (.@i < 546) .@enchant = 4735; //Agility6 + else if (.@i < 551) .@enchant = 4837; //Expert_Archer6 + else if (.@i < 556) .@enchant = 4807; //Atk_Speed1 + else .@enchant = 9; break; case 1: //Anger_Seagod - Short Range - set .@i, rand(1,555); - if (.@i < 81) set .@enchant,4732; //Agility3 - else if (.@i < 161) set .@enchant,4820; //Fighting_Spirit5 - else if (.@i < 241) set .@enchant,4843; //Sharp4 - else if (.@i < 311) set .@enchant,4733; //Agility4 - else if (.@i < 371) set .@enchant,4821; //Fighting_Spirit6 - else if (.@i < 431) set .@enchant,4844; //Sharp5 - else if (.@i < 476) set .@enchant,4734; //Agility5 - else if (.@i < 516) set .@enchant,4822; //Fighting_Spirit7 - else if (.@i < 526) set .@enchant,4807; //Atk_Speed1 - else if (.@i < 546) set .@enchant,4735; //Agility6 - else if (.@i < 551) set .@enchant,4823; //Fighting_Spirit8 - else if (.@i < 556) set .@enchant,4807; //Atk_Speed1 - else set .@enchant,9; + .@i = rand(1,555); + if (.@i < 81) .@enchant = 4732; //Agility3 + else if (.@i < 161) .@enchant = 4820; //Fighting_Spirit5 + else if (.@i < 241) .@enchant = 4843; //Sharp4 + else if (.@i < 311) .@enchant = 4733; //Agility4 + else if (.@i < 371) .@enchant = 4821; //Fighting_Spirit6 + else if (.@i < 431) .@enchant = 4844; //Sharp5 + else if (.@i < 476) .@enchant = 4734; //Agility5 + else if (.@i < 516) .@enchant = 4822; //Fighting_Spirit7 + else if (.@i < 526) .@enchant = 4807; //Atk_Speed1 + else if (.@i < 546) .@enchant = 4735; //Agility6 + else if (.@i < 551) .@enchant = 4823; //Fighting_Spirit8 + else if (.@i < 556) .@enchant = 4807; //Atk_Speed1 + else .@enchant = 9; break; default: mes "[Mayomayo]"; mes "There is something wrong. Please try again."; close; } - if (.@equip_card[3] == 0 && getarg(1) < 4) set .@equip_card[3],.@enchant; - else if (.@equip_card[2] == 0 && getarg(1) < 3) set .@equip_card[2],.@enchant; - else if (.@equip_card[1] == 0 && getarg(1) < 2) set .@equip_card[1],.@enchant; - else if (.@equip_card[0] == 0 && getarg(1) < 1) set .@equip_card[0],.@enchant; + if (.@equip_card[3] == 0 && getarg(1) < 4) .@equip_card[3] = .@enchant; + else if (.@equip_card[2] == 0 && getarg(1) < 3) .@equip_card[2] = .@enchant; + else if (.@equip_card[1] == 0 && getarg(1) < 2) .@equip_card[1] = .@enchant; + else if (.@equip_card[0] == 0 && getarg(1) < 1) .@equip_card[0] = .@enchant; else { mes "[Mayomayo]"; mes "This equipment is at the end of enchant. I provide enchant for two times maximum."; @@ -628,9 +628,9 @@ L_Socket: delequip EQI_HAND_R; // GetNonSlotItemSock2 .@equip_refine .@equip_id .@equip_card[0] .@equip_card[1] .@equip_card[2] .@equip_card[3] - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { if (.@equip_card[.@i] >= 4700) // Armor Enchant System - set .@equip_card[.@i],0; + .@equip_card[.@i] = 0; } getitem2 .@equip_id,1,1,.@equip_refine,0,.@equip_card[0],.@equip_card[1],.@equip_card[2],.@equip_card[3]; diff --git a/npc/re/merchants/enchan_mora.txt b/npc/re/merchants/enchan_mora.txt index e35f768a3..6db1cc002 100644 --- a/npc/re/merchants/enchan_mora.txt +++ b/npc/re/merchants/enchan_mora.txt @@ -97,7 +97,7 @@ mora,88,89,5 script Keeper of Secrets#pa082 4_M_MERCAT1,{ setarray .@items[0],1657,16013; //Wand_Of_Affection,Mace_Of_Judgement break; } - set .@item, .@items[rand(getarraysize(.@items))]; + .@item = .@items[rand(getarraysize(.@items))]; delitem 6380,10; //Mora_Coin getitem .@item,1; mes "[Artifice]"; @@ -112,9 +112,9 @@ mora,88,89,5 script Keeper of Secrets#pa082 4_M_MERCAT1,{ mes "It seems that you have power to control the ring so I cannot exchange it into coins."; close; } - if (countitem(2864)) set .@item,2864; //Light_Of_Cure - else if (countitem(2865)) set .@item,2865; //Seal_Of_Cathedral - else if (countitem(2866)) set .@item,2866; //Ring_Of_Archbishop + if (countitem(2864)) .@item = 2864; //Light_Of_Cure + else if (countitem(2865)) .@item = 2865; //Seal_Of_Cathedral + else if (countitem(2866)) .@item = 2866; //Ring_Of_Archbishop else { mes "[Artifice]"; mes "Did you change something?"; @@ -172,7 +172,7 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ mes "[Relice]"; mes "If you have a ritual for luck, you should use it now!"; next; - set .@select, select("Wait a minute!:Light of Cure:Seal of Cathedral:Ring of Archbishop:Shoes of Affection:Shoes of Judgement:Shawl of Affection:Shawl of Judgement:Robe of Affection:Robe of Judgement:Bible of Promise 1st Vol:Wand of Affection:Mace of Judgement"); + .@select = select("Wait a minute!:Light of Cure:Seal of Cathedral:Ring of Archbishop:Shoes of Affection:Shoes of Judgement:Shawl of Affection:Shawl of Judgement:Robe of Affection:Robe of Judgement:Bible of Promise 1st Vol:Wand of Affection:Mace of Judgement"); switch(.@select) { case 1: mes "[Relice]"; @@ -183,9 +183,9 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ case 4: setarray .@items[0],2864,2865,2866; //Light_Of_Cure,Seal_Of_Cathedral,Ring_Of_Archbishop setarray .@special[0],4803,4804,4805; //Highness_Heal_3sec,Coluceo_Heal30,Heal_Amount2 - set .@item, .@items[.@select-2]; - set .@sp, .@special[.@select-2]; - set .@enchant_type,1; + .@item = .@items[.@select-2]; + .@sp = .@special[.@select-2]; + .@enchant_type = 1; break; case 5: case 6: @@ -195,16 +195,16 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ case 10: case 11: setarray .@items[0],2471,2472,2569,2570,15029,15030,2156; //Shoes_Of_Affection,Shoes_Of_Judgement,Shawl_Of_Affection,Shawl_Of_Judgement,Robe_Of_Affection,Robe_Of_Judgement,Bible_Of_Promise1 - set .@item, .@items[.@select-5]; - set .@enchant_type,2; + .@item = .@items[.@select-5]; + .@enchant_type = 2; break; case 12: - set .@item,1657; //Wand_Of_Affection - set .@enchant_type,3; + .@item = 1657; //Wand_Of_Affection + .@enchant_type = 3; break; case 13: - set .@item,16013; //Mace_Of_Judgement - set .@enchant_type,4; + .@item = 16013; //Mace_Of_Judgement + .@enchant_type = 4; break; } if (countitem(6380) < 2 || countitem(.@item) == 0) { @@ -217,7 +217,7 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ delitem .@item,1; switch(.@enchant_type) { case 1: - set .@i, rand(1,1487); + .@i = rand(1,1487); if (.@i <= 1024) { // Basic combinations // (raw: .@i increments by 16, 4 repeats) @@ -235,7 +235,7 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ } break; case 2: - set .@i, rand(1,1487); + .@i = rand(1,1487); if (.@i <= 1024) { // Basic combinations // (raw: .@i increments by 16) @@ -262,7 +262,7 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ } break; case 3: - set .@i, rand(1,2852); + .@i = rand(1,2852); if (.@i <= 1984) { // Basic combinations // (raw: .@i increments by 31, 4 repeats) @@ -285,7 +285,7 @@ mora,96,74,5 script Master of Relics#pa0829 4_M_MERCAT1,{ } break; case 4: - set .@i, rand(1,2852); + .@i = rand(1,2852); if (.@i <= 1984) { // Basic combinations // (raw: .@i increments by 31, 4 repeats) @@ -363,9 +363,9 @@ mora,104,76,4 script Guardian of Artifacts#p 4_M_MERCAT1,{ mes "[Guardian of Artifacts]"; mes "Okay, see you later then."; close; - case 2: + case 2: setarray .@items[0],2467,2468,2469,2470; //Golden_Rod_Shoes,Aqua_Shoes,Crimson_Shoes,Forest_Shoes - set .@plural,1; + .@plural = 1; break; case 3: setarray .@items[0],2859,2860,2861,2862; //Golden_Rod_Orb,Aqua_Orb,Crimson_Orb,Forest_Orb @@ -382,7 +382,7 @@ mora,104,76,4 script Guardian of Artifacts#p 4_M_MERCAT1,{ mes "Would you please come back when you have enough Coins?"; close; } - set .@item, .@items[rand(getarraysize(.@items))]; + .@item = .@items[rand(getarraysize(.@items))]; delitem 6380,10; //Mora_Coin getitem .@item,1; mes "[Guardian of Artifacts]"; @@ -407,7 +407,7 @@ mora,99,93,5 script Artifact Crafter#pa0829 4_M_MERCAT1,{ mes "[Artifact Crafter]"; mes "Let me explain. One reinforcement costs you two Coins."; next; - set .@info_only,1; + .@info_only = 1; } mes "[Artifact Crafter]"; mes "And, I'll work on the item whether it's been already reinforced or not."; @@ -420,7 +420,7 @@ mora,99,93,5 script Artifact Crafter#pa0829 4_M_MERCAT1,{ if (.@info_only) close; next; - set .@select, select("Maybe next time.:Golden Rod Staff:Aqua Staff:Crimson Staff:Forest Staff:Golden Rod Shoes:Aqua Shoes:Crimson Shoes:Forest Shoes:Golden Rod Orb:Aqua Orb:Crimson Orb:Forest Orb:Golden Rod Robe:Aqua Robe:Crimson Robe:Forest Robe"); + .@select = select("Maybe next time.:Golden Rod Staff:Aqua Staff:Crimson Staff:Forest Staff:Golden Rod Shoes:Aqua Shoes:Crimson Shoes:Forest Shoes:Golden Rod Orb:Aqua Orb:Crimson Orb:Forest Orb:Golden Rod Robe:Aqua Robe:Crimson Robe:Forest Robe"); switch(.@select) { case 1: mes "[Artifact Crafter]"; @@ -431,31 +431,31 @@ mora,99,93,5 script Artifact Crafter#pa0829 4_M_MERCAT1,{ case 4: case 5: setarray .@items[0],2007,2008,2009,2010; //Golden_Rod_Staff,Aqua_Staff,Crimson_Staff,Forest_Staff - set .@enchant_type,1; + .@enchant_type = 1; break; case 6: case 7: case 8: case 9: setarray .@items[0],2467,2468,2469,2470; //Golden_Rod_Shoes,Aqua_Shoes,Crimson_Shoes,Forest_Shoes - set .@enchant_type,2; + .@enchant_type = 2; break; case 10: case 11: case 12: case 13: setarray .@items[0],2859,2860,2861,2862; //Golden_Rod_Orb,Aqua_Orb,Crimson_Orb,Forest_Orb - set .@enchant_type,2; + .@enchant_type = 2; break; case 14: case 15: case 16: case 17: setarray .@items[0],15025,15026,15027,15028; //Golden_Rod_Robe,Aqua_Robe,Crimson_Robe,Forest_Robe - set .@enchant_type,2; + .@enchant_type = 2; break; } - set .@item, .@items[(.@select-2)%4]; + .@item = .@items[(.@select-2)%4]; if (countitem(6380) < 2 || countitem(.@item) == 0) { mes "[Artifact Crafter]"; mes "You have to have 2 Mora Coins and an item to be reinforced before I can do my work."; @@ -466,7 +466,7 @@ mora,99,93,5 script Artifact Crafter#pa0829 4_M_MERCAT1,{ delitem .@item,1; switch(.@enchant_type) { case 1: - set .@i, rand(1,2847); + .@i = rand(1,2847); if (.@i <= 1984) { // Basic combinations // (raw: .@i increments by 31, 4 repeats) @@ -487,7 +487,7 @@ mora,99,93,5 script Artifact Crafter#pa0829 4_M_MERCAT1,{ } break; case 2: - set .@i, rand(1,2858); + .@i = rand(1,2858); if (.@i <= 1984) { // Basic combinations // (raw: .@i increments by 31) @@ -552,7 +552,7 @@ mora,152,97,5 script Guardian of Power#pa082 4_F_DOGTRAVELER,{ mes "^ff0000Choose carefully because these artifacts aren't easy to come by^000000. So what class do you want it for?"; next; setarray .@jobs$[0],"Rune Knight","Guillotine Cross","Ranger"; - set .@job, select("Cancel:Rune Knight:Guillotine Cross:Ranger")-2; + .@job = select("Cancel:Rune Knight:Guillotine Cross:Ranger")-2; if (.@job == -1) { mes "[Guardian of Power]"; mes "Talk to me later then."; @@ -565,15 +565,15 @@ mora,152,97,5 script Guardian of Power#pa082 4_F_DOGTRAVELER,{ switch(.@job) { case 0: // Rune Knight setarray .@items[0],2475,2476,2574,2575; - set .@i, select("Cancel:Ur's Greaves (Shoes):Peuz's Greaves (Shoes):Ur's Manteau (Garment):Peuz's Manteau (Garment)")-2; + .@i = select("Cancel:Ur's Greaves (Shoes):Peuz's Greaves (Shoes):Ur's Manteau (Garment):Peuz's Manteau (Garment)")-2; break; case 1: // Guillotine Cross setarray .@items[0],2477,2478,2577,2578; - set .@i, select("Cancel:Sapha Shoes (Shoes):Nab Shoes (Shoes):Sapha Hood (Garment):Nab Hood (Garment)")-2; + .@i = select("Cancel:Sapha Shoes (Shoes):Nab Shoes (Shoes):Sapha Hood (Garment):Nab Hood (Garment)")-2; break; case 2: // Ranger setarray .@items[0],2479,2480,2580,2581; - set .@i, select("Cancel:White Wing Boots (Shoes):Black Wing Boots (Shoes):White Wing Manteau (Garment):Black Wing Manteau (Garment)")-2; + .@i = select("Cancel:White Wing Boots (Shoes):Black Wing Boots (Shoes):White Wing Manteau (Garment):Black Wing Manteau (Garment)")-2; break; } if (.@i == -1) { @@ -625,10 +625,10 @@ mora,148,98,3 script Artifact Researcher#new 4_F_MORAFINE2,{ mes "The best part of my service is that any enhancements that you have in these artifacts will not be harmed."; close; case 2: - set @mora_enchant_select,1; + @mora_enchant_select = 1; break; case 3: - set @mora_enchant_select,2; + @mora_enchant_select = 2; break; } if (Zeny < 100000 || countitem(6380) == 0) { @@ -639,21 +639,21 @@ mora,148,98,3 script Artifact Researcher#new 4_F_MORAFINE2,{ mes "[Artifact Researcher]"; mes "Ok, so are you ready? Before I start working on this, what kind of equipment did you want me to enhance?"; next; - set .@i, select("I'm not wearing the equipment:1. Weapon:2. Shoes:3. Garment:4. Armor:5. Accessory")-2; + .@i = select("I'm not wearing the equipment:1. Weapon:2. Shoes:3. Garment:4. Armor:5. Accessory")-2; if (.@i == -1) { mes "[Artifact Researcher]"; mes "Make sure you're wearing the equipment first."; close; } setarray .@parts[0], EQI_HAND_R, EQI_SHOES, EQI_GARMENT, EQI_ARMOR, EQI_ACC_L; - set .@part, .@parts[.@i]; + .@part = .@parts[.@i]; if (!getequipisequiped(.@part)) { mes "[Artifact Researcher]"; mes "Make sure you're wearing the equipment first."; close; } - set .@equip_id, getequipid(.@part); - set @mora_equip_part, .@part; + .@equip_id = getequipid(.@part); + @mora_equip_part = .@part; //callsub L_Socket,<enchant type>,<bonus enchant type>,<4-x enchants possible>; // Enchant types: @@ -713,19 +713,19 @@ mora,148,98,3 script Artifact Researcher#new 4_F_MORAFINE2,{ mes "[Artifact Researcher]"; mes "^990099"+getequipname(.@part)+"^000000??"; mes "I really want to study this equipment..."; - set @mora_equip_part,0; + @mora_equip_part = 0; close; L_Socket: - set .@select, @mora_enchant_select; - set .@enchant_type, getarg(0); - set .@part, @mora_equip_part; - set .@equip_id, getequipid(.@part); - set .@equip_name$, getitemname(.@equip_id); - set .@equip_refine, getequiprefinerycnt(.@part); + .@select = @mora_enchant_select; + .@enchant_type = getarg(0); + .@part = @mora_equip_part; + .@equip_id = getequipid(.@part); + .@equip_name$ = getitemname(.@equip_id); + .@equip_refine = getequiprefinerycnt(.@part); setarray .@equip_card[0], getequipcardid(.@part,0),getequipcardid(.@part,1),getequipcardid(.@part,2),getequipcardid(.@part,3); - set @mora_equip_part,0; - set @mora_enchant_select,0; + @mora_equip_part = 0; + @mora_enchant_select = 0; if (.@select == 1) { // If refine is +9 or higher, unlock bonus enchant type. @@ -743,23 +743,23 @@ L_Socket: case 1: break; case 2: - set .@enchant_type, getarg(1); + .@enchant_type = getarg(1); break; } } if (.@equip_card[3] == 0 && getarg(2) < 4) { - set .@slot,4; + .@slot = 4; mes "[Artifact Researcher]"; mes "Attempting to strengthen the ability further. The previous enforcement won't be affected. Do you want to continue?"; } else if (.@equip_card[2] == 0 && getarg(2) < 3) { - set .@slot,3; + .@slot = 3; mes "[Artifact Researcher]"; mes "Attempting second enhancement. The previous enforcement won't be affected."; next; mes "[Artifact Researcher]"; mes "I may have a chance to fail now with this attempt. Do you wish to continue?"; } else if (.@equip_card[1] == 0 && getarg(2) < 2) { - set .@slot,2; + .@slot = 2; mes "[Artifact Researcher]"; mes "Let's start the third enhancement. I can give the best stats at this stage but remember, ^990000there is now a chance for the artifact to be destroyed and previous enhancements will be erased^000000. Continue?"; } else { @@ -775,301 +775,301 @@ L_Socket: } switch(.@enchant_type) { case 1: //Attack - if (.@slot == 4) set .@i, rand(1,525); - else if (.@slot == 3) set .@i, rand(301,655); - else if (.@slot == 2) set .@i, rand(451,750); + if (.@slot == 4) .@i = rand(1,525); + else if (.@slot == 3) .@i = rand(301,655); + else if (.@slot == 2) .@i = rand(451,750); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4700; //Strength1 - else if (.@i < 201) set .@enchant,4811; //Fighting_Spirit1 - else if (.@i < 301) set .@enchant,4819; //Atk1 - else if (.@i < 351) set .@enchant,4701; //Strength2 - else if (.@i < 401) set .@enchant,4810; //Fighting_Spirit2 - else if (.@i < 451) set .@enchant,4766; //Atk2 - else if (.@i < 476) set .@enchant,4702; //Strength3 - else if (.@i < 501) set .@enchant,4809; //Fighting_Spirit3 - else if (.@i < 526) set .@enchant,4767; //Atk3 - else if (.@i < 626) set .@enchant,0; - else if (.@i < 641) set .@enchant,4703; //Strength4 - else if (.@i < 656) set .@enchant,4808; //Fighting_Spirit4 - else if (.@i < 661) set .@enchant,4704; //Strength5 - else if (.@i < 666) set .@enchant,4820; //Fighting_Spirit5 - else if (.@i < 668) set .@enchant,4705; //Strength6 - else if (.@i < 670) set .@enchant,4821; //Fighting_Spirit6 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4700; //Strength1 + else if (.@i < 201) .@enchant = 4811; //Fighting_Spirit1 + else if (.@i < 301) .@enchant = 4819; //Atk1 + else if (.@i < 351) .@enchant = 4701; //Strength2 + else if (.@i < 401) .@enchant = 4810; //Fighting_Spirit2 + else if (.@i < 451) .@enchant = 4766; //Atk2 + else if (.@i < 476) .@enchant = 4702; //Strength3 + else if (.@i < 501) .@enchant = 4809; //Fighting_Spirit3 + else if (.@i < 526) .@enchant = 4767; //Atk3 + else if (.@i < 626) .@enchant = 0; + else if (.@i < 641) .@enchant = 4703; //Strength4 + else if (.@i < 656) .@enchant = 4808; //Fighting_Spirit4 + else if (.@i < 661) .@enchant = 4704; //Strength5 + else if (.@i < 666) .@enchant = 4820; //Fighting_Spirit5 + else if (.@i < 668) .@enchant = 4705; //Strength6 + else if (.@i < 670) .@enchant = 4821; //Fighting_Spirit6 + else .@enchant = 9; break; case 2: //Critical - if (.@slot == 4) set .@i, rand(1,470); - else if (.@slot == 3) set .@i, rand(201,610); - else if (.@slot == 2) set .@i, rand(381,750); + if (.@slot == 4) .@i = rand(1,470); + else if (.@slot == 3) .@i = rand(201,610); + else if (.@slot == 2) .@i = rand(381,750); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4750; //Luck1 - else if (.@i < 201) set .@enchant,4700; //Strength1 - else if (.@i < 261) set .@enchant,4751; //Luck2 - else if (.@i < 321) set .@enchant,4701; //Strength2 - else if (.@i < 351) set .@enchant,4752; //Luck3 - else if (.@i < 381) set .@enchant,4702; //Strength3 - else if (.@i < 411) set .@enchant,4764; //Critical5 - else if (.@i < 441) set .@enchant,4818; //Sharp1 - else if (.@i < 471) set .@enchant,4752; //Luck3 - else if (.@i < 571) set .@enchant,0; - else if (.@i < 586) set .@enchant,4753; //Luck4 - else if (.@i < 601) set .@enchant,4754; //Luck5 - else if (.@i < 606) set .@enchant,4765; //Critical7 - else if (.@i < 611) set .@enchant,4817; //Sharp2 - else if (.@i < 616) set .@enchant,4703; //Strength4 - else if (.@i < 618) set .@enchant,4816; //Sharp3 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4750; //Luck1 + else if (.@i < 201) .@enchant = 4700; //Strength1 + else if (.@i < 261) .@enchant = 4751; //Luck2 + else if (.@i < 321) .@enchant = 4701; //Strength2 + else if (.@i < 351) .@enchant = 4752; //Luck3 + else if (.@i < 381) .@enchant = 4702; //Strength3 + else if (.@i < 411) .@enchant = 4764; //Critical5 + else if (.@i < 441) .@enchant = 4818; //Sharp1 + else if (.@i < 471) .@enchant = 4752; //Luck3 + else if (.@i < 571) .@enchant = 0; + else if (.@i < 586) .@enchant = 4753; //Luck4 + else if (.@i < 601) .@enchant = 4754; //Luck5 + else if (.@i < 606) .@enchant = 4765; //Critical7 + else if (.@i < 611) .@enchant = 4817; //Sharp2 + else if (.@i < 616) .@enchant = 4703; //Strength4 + else if (.@i < 618) .@enchant = 4816; //Sharp3 + else .@enchant = 9; break; case 3: //Evasion - if (.@slot == 4) set .@i, rand(1,525); - else if (.@slot == 3) set .@i, rand(301,670); - else if (.@slot == 2) set .@i, rand(451,800); + if (.@slot == 4) .@i = rand(1,525); + else if (.@slot == 3) .@i = rand(301,670); + else if (.@slot == 2) .@i = rand(451,800); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4859; //Evasion1 - else if (.@i < 201) set .@enchant,4750; //Luck1 - else if (.@i < 301) set .@enchant,4730; //Agility1 - else if (.@i < 351) set .@enchant,4860; //Evasion3 - else if (.@i < 401) set .@enchant,4751; //Luck2 - else if (.@i < 451) set .@enchant,4731; //Agility2 - else if (.@i < 476) set .@enchant,4731; //Agility2 - else if (.@i < 501) set .@enchant,4752; //Luck3 - else if (.@i < 526) set .@enchant,4732; //Agility3 - else if (.@i < 626) set .@enchant,0; - else if (.@i < 641) set .@enchant,4762; //Evasion6 - else if (.@i < 656) set .@enchant,4753; //Luck4 - else if (.@i < 671) set .@enchant,4733; //Agility4 - else if (.@i < 676) set .@enchant,4763; //Evasion12 - else if (.@i < 681) set .@enchant,4754; //Luck5 - else if (.@i < 683) set .@enchant,4734; //Agility5 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4859; //Evasion1 + else if (.@i < 201) .@enchant = 4750; //Luck1 + else if (.@i < 301) .@enchant = 4730; //Agility1 + else if (.@i < 351) .@enchant = 4860; //Evasion3 + else if (.@i < 401) .@enchant = 4751; //Luck2 + else if (.@i < 451) .@enchant = 4731; //Agility2 + else if (.@i < 476) .@enchant = 4731; //Agility2 + else if (.@i < 501) .@enchant = 4752; //Luck3 + else if (.@i < 526) .@enchant = 4732; //Agility3 + else if (.@i < 626) .@enchant = 0; + else if (.@i < 641) .@enchant = 4762; //Evasion6 + else if (.@i < 656) .@enchant = 4753; //Luck4 + else if (.@i < 671) .@enchant = 4733; //Agility4 + else if (.@i < 676) .@enchant = 4763; //Evasion12 + else if (.@i < 681) .@enchant = 4754; //Luck5 + else if (.@i < 683) .@enchant = 4734; //Agility5 + else .@enchant = 9; break; case 4: //Healer - if (.@slot == 4) set .@i, rand(1,375); - else if (.@slot == 3) set .@i, rand(201,535); - else if (.@slot == 2) set .@i, rand(301,650); + if (.@slot == 4) .@i = rand(1,375); + else if (.@slot == 3) .@i = rand(201,535); + else if (.@slot == 2) .@i = rand(301,650); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4710; //Inteligence1 - else if (.@i < 201) set .@enchant,4720; //Dexterity1 - else if (.@i < 251) set .@enchant,4711; //Inteligence2 - else if (.@i < 301) set .@enchant,4721; //Dexterity2 - else if (.@i < 326) set .@enchant,4805; //Heal_Amount2 - else if (.@i < 351) set .@enchant,4712; //Inteligence3 - else if (.@i < 376) set .@enchant,4722; //Dexterity3 - else if (.@i < 476) set .@enchant,0; - else if (.@i < 491) set .@enchant,4760; //Matk1 - else if (.@i < 506) set .@enchant,4850; //Heal_Amount3 - else if (.@i < 521) set .@enchant,4713; //Inteligence4 - else if (.@i < 536) set .@enchant,4723; //Dexterity4 - else if (.@i < 541) set .@enchant,4761; //Matk2 - else if (.@i < 546) set .@enchant,4851; //Heal_Amount4 - else if (.@i < 548) set .@enchant,4806; //Matk3 - else if (.@i < 550) set .@enchant,4852; //Heal_Amount5 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4710; //Inteligence1 + else if (.@i < 201) .@enchant = 4720; //Dexterity1 + else if (.@i < 251) .@enchant = 4711; //Inteligence2 + else if (.@i < 301) .@enchant = 4721; //Dexterity2 + else if (.@i < 326) .@enchant = 4805; //Heal_Amount2 + else if (.@i < 351) .@enchant = 4712; //Inteligence3 + else if (.@i < 376) .@enchant = 4722; //Dexterity3 + else if (.@i < 476) .@enchant = 0; + else if (.@i < 491) .@enchant = 4760; //Matk1 + else if (.@i < 506) .@enchant = 4850; //Heal_Amount3 + else if (.@i < 521) .@enchant = 4713; //Inteligence4 + else if (.@i < 536) .@enchant = 4723; //Dexterity4 + else if (.@i < 541) .@enchant = 4761; //Matk2 + else if (.@i < 546) .@enchant = 4851; //Heal_Amount4 + else if (.@i < 548) .@enchant = 4806; //Matk3 + else if (.@i < 550) .@enchant = 4852; //Heal_Amount5 + else .@enchant = 9; break; case 5: //Spell 1 - if (.@slot == 4) set .@i, rand(1,600); - else if (.@slot == 3) set .@i, rand(401,760); - else if (.@slot == 2) set .@i, rand(401,766); + if (.@slot == 4) .@i = rand(1,600); + else if (.@slot == 3) .@i = rand(401,760); + else if (.@slot == 2) .@i = rand(401,766); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4710; //Inteligence1 - else if (.@i < 201) set .@enchant,4720; //Dexterity1 - else if (.@i < 301) set .@enchant,4795; //HP100 - else if (.@i < 401) set .@enchant,4815; //Spell1 - else if (.@i < 451) set .@enchant,4711; //Inteligence2 - else if (.@i < 501) set .@enchant,4721; //Dexterity2 - else if (.@i < 551) set .@enchant,4796; //HP200 - else if (.@i < 601) set .@enchant,4814; //Spell2 - else if (.@i < 701) set .@enchant,0; - else if (.@i < 716) set .@enchant,4712; //Inteligence3 - else if (.@i < 731) set .@enchant,4722; //Dexterity3 - else if (.@i < 746) set .@enchant,4797; //HP300 - else if (.@i < 761) set .@enchant,4813; //Spell3 - else if (.@i < 763) set .@enchant,4713; //Inteligence4 - else if (.@i < 765) set .@enchant,4723; //Dexterity4 - else if (.@i < 767) set .@enchant,4812; //Spell4 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4710; //Inteligence1 + else if (.@i < 201) .@enchant = 4720; //Dexterity1 + else if (.@i < 301) .@enchant = 4795; //HP100 + else if (.@i < 401) .@enchant = 4815; //Spell1 + else if (.@i < 451) .@enchant = 4711; //Inteligence2 + else if (.@i < 501) .@enchant = 4721; //Dexterity2 + else if (.@i < 551) .@enchant = 4796; //HP200 + else if (.@i < 601) .@enchant = 4814; //Spell2 + else if (.@i < 701) .@enchant = 0; + else if (.@i < 716) .@enchant = 4712; //Inteligence3 + else if (.@i < 731) .@enchant = 4722; //Dexterity3 + else if (.@i < 746) .@enchant = 4797; //HP300 + else if (.@i < 761) .@enchant = 4813; //Spell3 + else if (.@i < 763) .@enchant = 4713; //Inteligence4 + else if (.@i < 765) .@enchant = 4723; //Dexterity4 + else if (.@i < 767) .@enchant = 4812; //Spell4 + else .@enchant = 9; break; case 6: //Assist 1 - if (.@slot == 4) set .@i, rand(1,520); - else if (.@slot == 3) set .@i, rand(321,720); - else if (.@slot == 2) set .@i, rand(521,850); + if (.@slot == 4) .@i = rand(1,520); + else if (.@slot == 3) .@i = rand(321,720); + else if (.@slot == 2) .@i = rand(521,850); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 81) set .@enchant,4792; //Def6 - else if (.@i < 161) set .@enchant,4787; //Mdef4 - else if (.@i < 241) set .@enchant,4801; //SP100 - else if (.@i < 321) set .@enchant,4796; //HP200 - else if (.@i < 371) set .@enchant,4700; //Strength1 - else if (.@i < 421) set .@enchant,4720; //Dexterity1 - else if (.@i < 471) set .@enchant,4730; //Agility1 - else if (.@i < 521) set .@enchant,4740; //Vitality1 - else if (.@i < 621) set .@enchant,0; - else if (.@i < 646) set .@enchant,4793; //Def9 - else if (.@i < 671) set .@enchant,4788; //Mdef6 - else if (.@i < 696) set .@enchant,4802; //SP150 - else if (.@i < 721) set .@enchant,4797; //HP300 - else if (.@i < 731) set .@enchant,4701; //Strength2 - else if (.@i < 741) set .@enchant,4721; //Dexterity2 - else if (.@i < 751) set .@enchant,4731; //Agility2 - else set .@enchant,9; + if (.@i < 81) .@enchant = 4792; //Def6 + else if (.@i < 161) .@enchant = 4787; //Mdef4 + else if (.@i < 241) .@enchant = 4801; //SP100 + else if (.@i < 321) .@enchant = 4796; //HP200 + else if (.@i < 371) .@enchant = 4700; //Strength1 + else if (.@i < 421) .@enchant = 4720; //Dexterity1 + else if (.@i < 471) .@enchant = 4730; //Agility1 + else if (.@i < 521) .@enchant = 4740; //Vitality1 + else if (.@i < 621) .@enchant = 0; + else if (.@i < 646) .@enchant = 4793; //Def9 + else if (.@i < 671) .@enchant = 4788; //Mdef6 + else if (.@i < 696) .@enchant = 4802; //SP150 + else if (.@i < 721) .@enchant = 4797; //HP300 + else if (.@i < 731) .@enchant = 4701; //Strength2 + else if (.@i < 741) .@enchant = 4721; //Dexterity2 + else if (.@i < 751) .@enchant = 4731; //Agility2 + else .@enchant = 9; break; case 7: //Assist 2 - if (.@slot == 4) set .@i, rand(1,520); - else if (.@slot == 3) set .@i, rand(321,720); - else if (.@slot == 2) set .@i, rand(521,850); + if (.@slot == 4) .@i = rand(1,520); + else if (.@slot == 3) .@i = rand(321,720); + else if (.@slot == 2) .@i = rand(521,850); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 81) set .@enchant,4792; //Def6 - else if (.@i < 161) set .@enchant,4787; //Mdef4 - else if (.@i < 241) set .@enchant,4801; //SP100 - else if (.@i < 321) set .@enchant,4796; //HP200 - else if (.@i < 371) set .@enchant,4710; //Inteligence1 - else if (.@i < 421) set .@enchant,4720; //Dexterity1 - else if (.@i < 471) set .@enchant,4730; //Agility1 - else if (.@i < 521) set .@enchant,4740; //Vitality1 - else if (.@i < 621) set .@enchant,0; - else if (.@i < 646) set .@enchant,4793; //Def9 - else if (.@i < 671) set .@enchant,4788; //Mdef6 - else if (.@i < 696) set .@enchant,4802; //SP150 - else if (.@i < 721) set .@enchant,4797; //HP300 - else if (.@i < 731) set .@enchant,4711; //Inteligence2 - else if (.@i < 741) set .@enchant,4721; //Dexterity2 - else if (.@i < 751) set .@enchant,4741; //Vitality2 - else set .@enchant,9; + if (.@i < 81) .@enchant = 4792; //Def6 + else if (.@i < 161) .@enchant = 4787; //Mdef4 + else if (.@i < 241) .@enchant = 4801; //SP100 + else if (.@i < 321) .@enchant = 4796; //HP200 + else if (.@i < 371) .@enchant = 4710; //Inteligence1 + else if (.@i < 421) .@enchant = 4720; //Dexterity1 + else if (.@i < 471) .@enchant = 4730; //Agility1 + else if (.@i < 521) .@enchant = 4740; //Vitality1 + else if (.@i < 621) .@enchant = 0; + else if (.@i < 646) .@enchant = 4793; //Def9 + else if (.@i < 671) .@enchant = 4788; //Mdef6 + else if (.@i < 696) .@enchant = 4802; //SP150 + else if (.@i < 721) .@enchant = 4797; //HP300 + else if (.@i < 731) .@enchant = 4711; //Inteligence2 + else if (.@i < 741) .@enchant = 4721; //Dexterity2 + else if (.@i < 751) .@enchant = 4741; //Vitality2 + else .@enchant = 9; break; case 8: //Strength - if (.@slot == 4) set .@i, rand(1,525); - else if (.@slot == 3) set .@i, rand(301,685); - else if (.@slot == 2) set .@i, rand(451,800); + if (.@slot == 4) .@i = rand(1,525); + else if (.@slot == 3) .@i = rand(301,685); + else if (.@slot == 2) .@i = rand(451,800); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4740; //Vitality1 - else if (.@i < 201) set .@enchant,4797; //HP300 - else if (.@i < 301) set .@enchant,4791; //Def3 - else if (.@i < 351) set .@enchant,4741; //Vitality2 - else if (.@i < 401) set .@enchant,4798; //HP400 - else if (.@i < 451) set .@enchant,4792; //Def6 - else if (.@i < 476) set .@enchant,4742; //Vitality3 - else if (.@i < 501) set .@enchant,4793; //Def9 - else if (.@i < 526) set .@enchant,4799; //HP500 - else if (.@i < 626) set .@enchant,0; - else if (.@i < 641) set .@enchant,4742; //Vitality3 - else if (.@i < 656) set .@enchant,4743; //Vitality4 - else if (.@i < 671) set .@enchant,4794; //Def12 - //else if (.@i < 686) set .@enchant,01; // ?? - else if (.@i < 688) set .@enchant,4744; //Vitality5 - //else if (.@i < 690) set .@enchant,02; // ?? - else set .@enchant,9; + if (.@i < 101) .@enchant = 4740; //Vitality1 + else if (.@i < 201) .@enchant = 4797; //HP300 + else if (.@i < 301) .@enchant = 4791; //Def3 + else if (.@i < 351) .@enchant = 4741; //Vitality2 + else if (.@i < 401) .@enchant = 4798; //HP400 + else if (.@i < 451) .@enchant = 4792; //Def6 + else if (.@i < 476) .@enchant = 4742; //Vitality3 + else if (.@i < 501) .@enchant = 4793; //Def9 + else if (.@i < 526) .@enchant = 4799; //HP500 + else if (.@i < 626) .@enchant = 0; + else if (.@i < 641) .@enchant = 4742; //Vitality3 + else if (.@i < 656) .@enchant = 4743; //Vitality4 + else if (.@i < 671) .@enchant = 4794; //Def12 + //else if (.@i < 686) .@enchant = 01; // ?? + else if (.@i < 688) .@enchant = 4744; //Vitality5 + //else if (.@i < 690) .@enchant = 02; // ?? + else .@enchant = 9; break; case 9: //Range - if (.@slot == 4) set .@i, rand(1,470); - else if (.@slot == 3) set .@i, rand(201,610); - else if (.@slot == 2) set .@i, rand(321,750); + if (.@slot == 4) .@i = rand(1,470); + else if (.@slot == 3) .@i = rand(201,610); + else if (.@slot == 2) .@i = rand(321,750); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4750; //Luck1 - else if (.@i < 201) set .@enchant,4720; //Dexterity1 - else if (.@i < 261) set .@enchant,4751; //Luck2 - else if (.@i < 321) set .@enchant,4721; //Dexterity2 - else if (.@i < 351) set .@enchant,4752; //Luck3 - else if (.@i < 381) set .@enchant,4722; //Dexterity3 - else if (.@i < 411) set .@enchant,4764; //Critical5 - else if (.@i < 441) set .@enchant,4832; //Expert_Archer1 - else if (.@i < 471) set .@enchant,4753; //Luck4 - else if (.@i < 571) set .@enchant,0; - else if (.@i < 586) set .@enchant,4723; //Dexterity4 - else if (.@i < 601) set .@enchant,4833; //Expert_Archer2 - else if (.@i < 606) set .@enchant,4765; //Critical7 - else if (.@i < 611) set .@enchant,4834; //Expert_Archer3 - else if (.@i < 616) set .@enchant,4724; //Dexterity5 - else if (.@i < 618) set .@enchant,4835; //Expert_Archer4 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4750; //Luck1 + else if (.@i < 201) .@enchant = 4720; //Dexterity1 + else if (.@i < 261) .@enchant = 4751; //Luck2 + else if (.@i < 321) .@enchant = 4721; //Dexterity2 + else if (.@i < 351) .@enchant = 4752; //Luck3 + else if (.@i < 381) .@enchant = 4722; //Dexterity3 + else if (.@i < 411) .@enchant = 4764; //Critical5 + else if (.@i < 441) .@enchant = 4832; //Expert_Archer1 + else if (.@i < 471) .@enchant = 4753; //Luck4 + else if (.@i < 571) .@enchant = 0; + else if (.@i < 586) .@enchant = 4723; //Dexterity4 + else if (.@i < 601) .@enchant = 4833; //Expert_Archer2 + else if (.@i < 606) .@enchant = 4765; //Critical7 + else if (.@i < 611) .@enchant = 4834; //Expert_Archer3 + else if (.@i < 616) .@enchant = 4724; //Dexterity5 + else if (.@i < 618) .@enchant = 4835; //Expert_Archer4 + else .@enchant = 9; break; case 10: //Physical - if (.@slot == 4) set .@i, rand(1,600); - else if (.@slot == 3) set .@i, rand(401,800); - else if (.@slot == 2) set .@i, rand(601,930); + if (.@slot == 4) .@i = rand(1,600); + else if (.@slot == 3) .@i = rand(401,800); + else if (.@slot == 2) .@i = rand(601,930); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4791; //Def3 - else if (.@i < 201) set .@enchant,4730; //Agility1 - else if (.@i < 301) set .@enchant,4750; //Luck1 - else if (.@i < 401) set .@enchant,4795; //HP100 - else if (.@i < 451) set .@enchant,4792; //Def6 - else if (.@i < 501) set .@enchant,4731; //Agility2 - else if (.@i < 551) set .@enchant,4751; //Luck2 - else if (.@i < 601) set .@enchant,4796; //HP200 - else if (.@i < 701) set .@enchant,0; - else if (.@i < 726) set .@enchant,4793; //Def9 - else if (.@i < 751) set .@enchant,4732; //Agility3 - else if (.@i < 776) set .@enchant,4752; //Luck3 - else if (.@i < 801) set .@enchant,4797; //HP300 - else if (.@i < 816) set .@enchant,4733; //Agility4 - else if (.@i < 831) set .@enchant,4753; //Luck4 - else if (.@i < 833) set .@enchant,4807; //Atk_Speed1 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4791; //Def3 + else if (.@i < 201) .@enchant = 4730; //Agility1 + else if (.@i < 301) .@enchant = 4750; //Luck1 + else if (.@i < 401) .@enchant = 4795; //HP100 + else if (.@i < 451) .@enchant = 4792; //Def6 + else if (.@i < 501) .@enchant = 4731; //Agility2 + else if (.@i < 551) .@enchant = 4751; //Luck2 + else if (.@i < 601) .@enchant = 4796; //HP200 + else if (.@i < 701) .@enchant = 0; + else if (.@i < 726) .@enchant = 4793; //Def9 + else if (.@i < 751) .@enchant = 4732; //Agility3 + else if (.@i < 776) .@enchant = 4752; //Luck3 + else if (.@i < 801) .@enchant = 4797; //HP300 + else if (.@i < 816) .@enchant = 4733; //Agility4 + else if (.@i < 831) .@enchant = 4753; //Luck4 + else if (.@i < 833) .@enchant = 4807; //Atk_Speed1 + else .@enchant = 9; break; case 11: //Spell 2 - if (.@slot == 4) set .@i, rand(1,600); - else if (.@slot == 3) set .@i, rand(401,760); - else if (.@slot == 2) set .@i, rand(401,766); + if (.@slot == 4) .@i = rand(1,600); + else if (.@slot == 3) .@i = rand(401,760); + else if (.@slot == 2) .@i = rand(401,766); else { mes "[Artifact Researcher]"; mes "An unknown error has occurred."; close; } - if (.@i < 101) set .@enchant,4711; //Inteligence2 - else if (.@i < 201) set .@enchant,4721; //Dexterity2 - else if (.@i < 301) set .@enchant,4796; //HP200 - else if (.@i < 401) set .@enchant,4814; //Spell2 - else if (.@i < 451) set .@enchant,4712; //Inteligence3 - else if (.@i < 501) set .@enchant,4722; //Dexterity3 - else if (.@i < 551) set .@enchant,4760; //Matk1 - else if (.@i < 601) set .@enchant,4813; //Spell3 - else if (.@i < 701) set .@enchant,0; - else if (.@i < 716) set .@enchant,4713; //Inteligence4 - else if (.@i < 731) set .@enchant,4723; //Dexterity4 - else if (.@i < 746) set .@enchant,4761; //Matk2 - else if (.@i < 761) set .@enchant,4812; //Spell4 - else if (.@i < 763) set .@enchant,4714; //Inteligence5 - else if (.@i < 765) set .@enchant,4724; //Dexterity5 - else if (.@i < 767) set .@enchant,4806; //Matk3 - else set .@enchant,9; + if (.@i < 101) .@enchant = 4711; //Inteligence2 + else if (.@i < 201) .@enchant = 4721; //Dexterity2 + else if (.@i < 301) .@enchant = 4796; //HP200 + else if (.@i < 401) .@enchant = 4814; //Spell2 + else if (.@i < 451) .@enchant = 4712; //Inteligence3 + else if (.@i < 501) .@enchant = 4722; //Dexterity3 + else if (.@i < 551) .@enchant = 4760; //Matk1 + else if (.@i < 601) .@enchant = 4813; //Spell3 + else if (.@i < 701) .@enchant = 0; + else if (.@i < 716) .@enchant = 4713; //Inteligence4 + else if (.@i < 731) .@enchant = 4723; //Dexterity4 + else if (.@i < 746) .@enchant = 4761; //Matk2 + else if (.@i < 761) .@enchant = 4812; //Spell4 + else if (.@i < 763) .@enchant = 4714; //Inteligence5 + else if (.@i < 765) .@enchant = 4724; //Dexterity5 + else if (.@i < 767) .@enchant = 4806; //Matk3 + else .@enchant = 9; break; default: mes "[Artifact Researcher]"; @@ -1077,17 +1077,17 @@ L_Socket: close; } if (.@equip_card[3] == 0 && getarg(2) < 4) { - set .@equip_card[3],.@enchant; + .@equip_card[3] = .@enchant; } else if (.@equip_card[2] == 0 && getarg(2) < 3) { - set .@equip_card[2],.@enchant; + .@equip_card[2] = .@enchant; if (.@enchant == 0) { - set .@equip_card[3],0; + .@equip_card[3] = 0; } } else if (.@equip_card[1] == 0 && getarg(2) < 2) { - set .@equip_card[1],.@enchant; + .@equip_card[1] = .@enchant; if (.@enchant == 0) { - set .@equip_card[2],0; - set .@equip_card[3],0; + .@equip_card[2] = 0; + .@equip_card[3] = 0; } } else { mes "[Artifact Researcher]"; @@ -1106,7 +1106,7 @@ L_Socket: specialeffect2 EF_SUI_EXPLOSION; mes "[Artifact Researcher]"; mes "This!"; - mes "I... I'm sorry but the equipment has been destroyed."; + mes "I... I'm sorry but the equipment has been destroyed."; close; } if (.@enchant == 0) { @@ -1139,9 +1139,9 @@ L_Socket: delequip .@part; // GetNonSlotItemSock2 .@equip_refine .@equip_id .@equip_card[0] .@equip_card[1] .@equip_card[2] .@equip_card[3] - for(set .@i,0; .@i<4; set .@i,.@i+1) { + for(.@i = 0; .@i<4; ++.@i) { if (.@equip_card[.@i] >= 4700) // Armor Enchant System - set .@equip_card[.@i],0; + .@equip_card[.@i] = 0; } getitem2 .@equip_id,1,1,.@equip_refine,0,.@equip_card[0],.@equip_card[1],.@equip_card[2],.@equip_card[3]; @@ -1271,7 +1271,7 @@ mora,124,82,4 script Artifact Collector#blan 4_M_RAFLE_OR,{ setarray .@artifacts[0],1657,16013,2007,2008,2009,2010; setarray .@empowered[0],1660,16018,2011,2012,2013,2014; while(1) { - set .@i, select("I don't think I'm interested:Staff of Mercy:Mace of Judgement:Golden Rod Staff:Aqua Staff:Crimson Staff:Forest Staff")-2; + .@i = select("I don't think I'm interested:Staff of Mercy:Mace of Judgement:Golden Rod Staff:Aqua Staff:Crimson Staff:Forest Staff")-2; if (.@i == -1) { emotion e_what; mes "[Artifact Collector]"; @@ -1284,15 +1284,15 @@ mora,124,82,4 script Artifact Collector#blan 4_M_RAFLE_OR,{ switch(.@i) { case 0: setarray .@enchants[0],4761,4723,4714; - set .@str$, "MATK+2%, DEX+4, INT+5"; + .@str$ = "MATK+2%, DEX+4, INT+5"; break; case 1: setarray .@enchants[0],4767,4723,4704; - set .@str$, "ATK+3%, DEX+4, STR+5"; + .@str$ = "ATK+3%, DEX+4, STR+5"; break; default: setarray .@enchants[0],4761,4713; - set .@str$, "MATK+2%, INT+4"; + .@str$ = "MATK+2%, INT+4"; break; } mes "[Artifact Collector]"; @@ -1319,7 +1319,7 @@ mora,124,82,4 script Artifact Collector#blan 4_M_RAFLE_OR,{ mes "I don't know what you are trying to do... I can't enhance what you don't have."; close; } - set .@equip_id, getequipid(EQI_HAND_R); + .@equip_id = getequipid(EQI_HAND_R); setarray .@equip_card[2], getequipcardid(EQI_HAND_R,2),getequipcardid(EQI_HAND_R,3); switch(.@equip_id) { case 2007: //Golden_Rod_Staff @@ -1328,19 +1328,19 @@ mora,124,82,4 script Artifact Collector#blan 4_M_RAFLE_OR,{ case 2010: //Forest_Staff if (.@equip_card[2] == 4761 || .@equip_card[3] == 4761 || //Matk2 .@equip_card[2] == 4713 || .@equip_card[3] == 4713) //Inteligence4 - set .@empowered,.@equip_id+4; //Golden_Rod_Staff2,Aqua_Staff2,Crimson_Staff2,Forest_Staff2 + .@empowered = .@equip_id+4; //Golden_Rod_Staff2,Aqua_Staff2,Crimson_Staff2,Forest_Staff2 break; case 1657: //Wand_Of_Affection if (.@equip_card[2] == 4761 || .@equip_card[3] == 4761 || //Matk2 .@equip_card[2] == 4714 || .@equip_card[3] == 4714 || //Inteligence5 .@equip_card[2] == 4723 || .@equip_card[3] == 4723) //Dexterity4 - set .@empowered,1660; //Wand_Of_Affection2 + .@empowered = 1660; //Wand_Of_Affection2 break; case 16013: //Mace_Of_Judgement if (.@equip_card[2] == 4723 || .@equip_card[3] == 4723 || //Dexterity4 .@equip_card[2] == 4704 || .@equip_card[3] == 4704 || //Strength5 .@equip_card[2] == 4767 || .@equip_card[3] == 4767) //Atk3 - set .@empowered,16018; //Mace_Of_Judgement2 + .@empowered = 16018; //Mace_Of_Judgement2 break; default: emotion e_an; @@ -1477,7 +1477,7 @@ function script F_Mora_Enchant { progressbar "ffff00",3; delitem 6380,5; //Mora_Coin delitem getarg(0),1; - set .@i, rand(1,4568); + .@i = rand(1,4568); if (.@i <= 3168) { // Basic combinations // (raw: .@i increments by 11) @@ -1525,7 +1525,7 @@ mora,105,176,4 script Master Tailor#pa0829 4_ELEPHANT,{ mes "I happen to have a few army paddings in stock. Would you like to buy one? The price is 1 Mora Coin. So cheap."; next; switch(select("Maybe next time.:I'll buy one now.")) { - case 1: + case 1: mes "[Master Tailor]"; mes "Okay, I understand."; mes "Come back for one if you change your mind."; diff --git a/npc/re/merchants/enchan_upg.txt b/npc/re/merchants/enchan_upg.txt index abbc0896a..939f7d812 100644 --- a/npc/re/merchants/enchan_upg.txt +++ b/npc/re/merchants/enchan_upg.txt @@ -49,7 +49,7 @@ prt_in,28,73,3 script Devil Enchant Master#prq 1_M_SMITH,{ mes "Are you listening to me? I will only do for you if you bring the Enchant Book!"; close; } - set .@select,1; + .@select = 1; break; case 3: mes "[Devil Enchant Master]"; @@ -64,10 +64,10 @@ prt_in,28,73,3 script Devil Enchant Master#prq 1_M_SMITH,{ mes "Come back after you have confirmed!"; close; } - set .@select,2; + .@select = 2; break; } - set .@part, EQI_HAND_R; + .@part = EQI_HAND_R; mes "[Devil Enchant Master]"; if (!getequipisequiped(.@part)) { @@ -79,13 +79,13 @@ prt_in,28,73,3 script Devil Enchant Master#prq 1_M_SMITH,{ mes "It is dangerous to remove equipment during enchant process!"; close; } - set .@equip_id, getequipid(.@part); - set .@item$, "|1292|1394|1491|1585|2015|13071|13115|16019|18112|21000|"; + .@equip_id = getequipid(.@part); + .@item$ = "|1292|1394|1491|1585|2015|13071|13115|16019|18112|21000|"; if (!compare(.@item$,"|"+.@equip_id+"|")) { mes "I don't want to touch your equipment now!"; close; } - set .@equip_refine, getequiprefinerycnt(.@part); + .@equip_refine = getequiprefinerycnt(.@part); if (.@select == 1) { if (!countitem(6484)) { @@ -100,10 +100,10 @@ prt_in,28,73,3 script Devil Enchant Master#prq 1_M_SMITH,{ mes "Come back again after you change your mind!"; close; case 2: - set .@enc_type,1; + .@enc_type = 1; break; case 3: - set .@enc_type,2; + .@enc_type = 2; break; } mes "[Devil Enchant Master]"; @@ -125,81 +125,81 @@ prt_in,28,73,3 script Devil Enchant Master#prq 1_M_SMITH,{ } if (.@enc_type == 1) { // Physical Series - set .@i, rand(1,1300); - if (.@i < 51) set .@enchant,4734; //Agility5 - else if (.@i < 76) set .@enchant,4735; //Agility6 - else if (.@i < 88) set .@enchant,4736; //Agility7 - else if (.@i < 93) set .@enchant,4737; //Agility8 - else if (.@i < 95) set .@enchant,4738; //Agility9 - else if (.@i < 96) set .@enchant,4739; //Agility10 - else if (.@i < 146) set .@enchant,4724; //Dexterity5 - else if (.@i < 171) set .@enchant,4725; //Dexterity6 - else if (.@i < 183) set .@enchant,4726; //Dexterity7 - else if (.@i < 188) set .@enchant,4727; //Dexterity8 - else if (.@i < 190) set .@enchant,4728; //Dexterity9 - else if (.@i < 191) set .@enchant,4729; //Dexterity10 - else if (.@i < 291) set .@enchant,4704; //Strength5 - else if (.@i < 341) set .@enchant,4705; //Strength6 - else if (.@i < 366) set .@enchant,4706; //Strength7 - else if (.@i < 378) set .@enchant,4707; //Strength8 - else if (.@i < 383) set .@enchant,4708; //Strength9 - else if (.@i < 384) set .@enchant,4709; //Strength10 - else if (.@i < 434) set .@enchant,4754; //Luck5 - else if (.@i < 459) set .@enchant,4755; //Luck6 - else if (.@i < 471) set .@enchant,4756; //Luck7 - else if (.@i < 476) set .@enchant,4757; //Luck8 - else if (.@i < 478) set .@enchant,4758; //Luck9 - else if (.@i < 479) set .@enchant,4759; //Luck10 - else if (.@i < 679) set .@enchant,4744; //Vitality5 - else if (.@i < 779) set .@enchant,4745; //Vitality6 - else if (.@i < 829) set .@enchant,4746; //Vitality7 - else if (.@i < 854) set .@enchant,4747; //Vitality8 - else if (.@i < 866) set .@enchant,4748; //Vitality9 - else if (.@i < 867) set .@enchant,4749; //Vitality10 - else if (.@i < 967) set .@enchant,4808; //Fighting_Spirit4 - else if (.@i < 992) set .@enchant,4820; //Fighting_Spirit5 - else if (.@i < 1092) set .@enchant,4835; //Expert_Archer4 - else if (.@i < 1117) set .@enchant,4836; //Expert_Archer5 - else if (.@i < 1217) set .@enchant,4835; //Expert_Archer4 - else if (.@i < 1242) set .@enchant,4836; //Expert_Archer5 - else set .@enchant,0; + .@i = rand(1,1300); + if (.@i < 51) .@enchant = 4734; //Agility5 + else if (.@i < 76) .@enchant = 4735; //Agility6 + else if (.@i < 88) .@enchant = 4736; //Agility7 + else if (.@i < 93) .@enchant = 4737; //Agility8 + else if (.@i < 95) .@enchant = 4738; //Agility9 + else if (.@i < 96) .@enchant = 4739; //Agility10 + else if (.@i < 146) .@enchant = 4724; //Dexterity5 + else if (.@i < 171) .@enchant = 4725; //Dexterity6 + else if (.@i < 183) .@enchant = 4726; //Dexterity7 + else if (.@i < 188) .@enchant = 4727; //Dexterity8 + else if (.@i < 190) .@enchant = 4728; //Dexterity9 + else if (.@i < 191) .@enchant = 4729; //Dexterity10 + else if (.@i < 291) .@enchant = 4704; //Strength5 + else if (.@i < 341) .@enchant = 4705; //Strength6 + else if (.@i < 366) .@enchant = 4706; //Strength7 + else if (.@i < 378) .@enchant = 4707; //Strength8 + else if (.@i < 383) .@enchant = 4708; //Strength9 + else if (.@i < 384) .@enchant = 4709; //Strength10 + else if (.@i < 434) .@enchant = 4754; //Luck5 + else if (.@i < 459) .@enchant = 4755; //Luck6 + else if (.@i < 471) .@enchant = 4756; //Luck7 + else if (.@i < 476) .@enchant = 4757; //Luck8 + else if (.@i < 478) .@enchant = 4758; //Luck9 + else if (.@i < 479) .@enchant = 4759; //Luck10 + else if (.@i < 679) .@enchant = 4744; //Vitality5 + else if (.@i < 779) .@enchant = 4745; //Vitality6 + else if (.@i < 829) .@enchant = 4746; //Vitality7 + else if (.@i < 854) .@enchant = 4747; //Vitality8 + else if (.@i < 866) .@enchant = 4748; //Vitality9 + else if (.@i < 867) .@enchant = 4749; //Vitality10 + else if (.@i < 967) .@enchant = 4808; //Fighting_Spirit4 + else if (.@i < 992) .@enchant = 4820; //Fighting_Spirit5 + else if (.@i < 1092) .@enchant = 4835; //Expert_Archer4 + else if (.@i < 1117) .@enchant = 4836; //Expert_Archer5 + else if (.@i < 1217) .@enchant = 4835; //Expert_Archer4 + else if (.@i < 1242) .@enchant = 4836; //Expert_Archer5 + else .@enchant = 0; } else if (.@enc_type == 2) { // Magical Series - set .@i, rand(1,1200); - if (.@i < 51) set .@enchant,4714; //Inteligence5 - else if (.@i < 76) set .@enchant,4715; //Inteligence6 - else if (.@i < 88) set .@enchant,4716; //Inteligence7 - else if (.@i < 93) set .@enchant,4717; //Inteligence8 - else if (.@i < 95) set .@enchant,4718; //Inteligence9 - else if (.@i < 96) set .@enchant,4719; //Inteligence10 - else if (.@i < 146) set .@enchant,4724; //Dexterity5 - else if (.@i < 171) set .@enchant,4725; //Dexterity6 - else if (.@i < 183) set .@enchant,4726; //Dexterity7 - else if (.@i < 188) set .@enchant,4727; //Dexterity8 - else if (.@i < 190) set .@enchant,4728; //Dexterity9 - else if (.@i < 191) set .@enchant,4729; //Dexterity10 - else if (.@i < 291) set .@enchant,4734; //Agility5 - else if (.@i < 341) set .@enchant,4735; //Agility6 - else if (.@i < 366) set .@enchant,4736; //Agility7 - else if (.@i < 378) set .@enchant,4737; //Agility8 - else if (.@i < 383) set .@enchant,4738; //Agility9 - else if (.@i < 384) set .@enchant,4739; //Agility10 - else if (.@i < 484) set .@enchant,4754; //Luck5 - else if (.@i < 534) set .@enchant,4755; //Luck6 - else if (.@i < 559) set .@enchant,4756; //Luck7 - else if (.@i < 571) set .@enchant,4757; //Luck8 - else if (.@i < 576) set .@enchant,4758; //Luck9 - else if (.@i < 577) set .@enchant,4759; //Luck10 - else if (.@i < 777) set .@enchant,4744; //Vitality5 - else if (.@i < 877) set .@enchant,4745; //Vitality6 - else if (.@i < 927) set .@enchant,4746; //Vitality7 - else if (.@i < 952) set .@enchant,4747; //Vitality8 - else if (.@i < 964) set .@enchant,4748; //Vitality9 - else if (.@i < 969) set .@enchant,4749; //Vitality10 - else if (.@i < 1069) set .@enchant,4812; //Spell4 - else if (.@i < 1094) set .@enchant,4826; //Spell5 - else if (.@i < 1119) set .@enchant,4761; //Matk2 - else if (.@i < 1124) set .@enchant,4806; //Matk3 - else set .@enchant,0; + .@i = rand(1,1200); + if (.@i < 51) .@enchant = 4714; //Inteligence5 + else if (.@i < 76) .@enchant = 4715; //Inteligence6 + else if (.@i < 88) .@enchant = 4716; //Inteligence7 + else if (.@i < 93) .@enchant = 4717; //Inteligence8 + else if (.@i < 95) .@enchant = 4718; //Inteligence9 + else if (.@i < 96) .@enchant = 4719; //Inteligence10 + else if (.@i < 146) .@enchant = 4724; //Dexterity5 + else if (.@i < 171) .@enchant = 4725; //Dexterity6 + else if (.@i < 183) .@enchant = 4726; //Dexterity7 + else if (.@i < 188) .@enchant = 4727; //Dexterity8 + else if (.@i < 190) .@enchant = 4728; //Dexterity9 + else if (.@i < 191) .@enchant = 4729; //Dexterity10 + else if (.@i < 291) .@enchant = 4734; //Agility5 + else if (.@i < 341) .@enchant = 4735; //Agility6 + else if (.@i < 366) .@enchant = 4736; //Agility7 + else if (.@i < 378) .@enchant = 4737; //Agility8 + else if (.@i < 383) .@enchant = 4738; //Agility9 + else if (.@i < 384) .@enchant = 4739; //Agility10 + else if (.@i < 484) .@enchant = 4754; //Luck5 + else if (.@i < 534) .@enchant = 4755; //Luck6 + else if (.@i < 559) .@enchant = 4756; //Luck7 + else if (.@i < 571) .@enchant = 4757; //Luck8 + else if (.@i < 576) .@enchant = 4758; //Luck9 + else if (.@i < 577) .@enchant = 4759; //Luck10 + else if (.@i < 777) .@enchant = 4744; //Vitality5 + else if (.@i < 877) .@enchant = 4745; //Vitality6 + else if (.@i < 927) .@enchant = 4746; //Vitality7 + else if (.@i < 952) .@enchant = 4747; //Vitality8 + else if (.@i < 964) .@enchant = 4748; //Vitality9 + else if (.@i < 969) .@enchant = 4749; //Vitality10 + else if (.@i < 1069) .@enchant = 4812; //Spell4 + else if (.@i < 1094) .@enchant = 4826; //Spell5 + else if (.@i < 1119) .@enchant = 4761; //Matk2 + else if (.@i < 1124) .@enchant = 4806; //Matk3 + else .@enchant = 0; } else { mes "[Devil Enchant Master]"; mes "Hmm! This item is having a problem, please check it again!"; @@ -217,8 +217,8 @@ prt_in,28,73,3 script Devil Enchant Master#prq 1_M_SMITH,{ if (.@enchant == 0) { specialeffect EF_SHIELDCHARGE; mes "Oh! Unbelievable!! It failed!! Please come again!"; - set .@lost_refine, rand(0,.@equip_refine); - set .@equip_refine, .@equip_refine - .@lost_refine; + .@lost_refine = rand(0,.@equip_refine); + .@equip_refine -= .@lost_refine; } else { specialeffect EF_REPAIRWEAPON; mes "The slot ^9900004^000000 has been enchanted!"; diff --git a/npc/re/merchants/flute.txt b/npc/re/merchants/flute.txt index 343308268..d2c9515b2 100644 --- a/npc/re/merchants/flute.txt +++ b/npc/re/merchants/flute.txt @@ -43,10 +43,10 @@ if (eaclass()&EAJL_THIRD) { mes "[Falcon Flute Trader]"; mes "For Rangers, however, I have a special price of 10,000 zeny!"; - set .@price,10000; + .@price = 10000; next; } else - set .@price,12500; + .@price = 12500; if(select("Don't buy one:Buy a Falcon Flute") == 1) { mes "[Falcon Flute Trader]"; mes "That's too bad. If you need one, come back!"; diff --git a/npc/re/merchants/hd_refiner.txt b/npc/re/merchants/hd_refiner.txt index 0e0f3e081..7c875e995 100644 --- a/npc/re/merchants/hd_refiner.txt +++ b/npc/re/merchants/hd_refiner.txt @@ -31,10 +31,10 @@ mes "So lets kick this into overdrive, what d' ya say? What item do you want to refine?"; next; setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) - set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Not equipped]")+":"; - set .@part, select(.@menu$); + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) + .@menu$ += ((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Not equipped]")+":"; + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Blacksmith Mighty Hammer]"; switch(.@part) { @@ -80,15 +80,15 @@ switch(getequipweaponlv(.@part)) { default: case 0: - set .@price,20000; - set .@material,6241; //HD_Elunium + .@price = 20000; + .@material = 6241; //HD_Elunium break; case 1: case 2: case 3: case 4: - set .@price,20000; - set .@material,6240; //HD_Oridecon + .@price = 20000; + .@material = 6240; //HD_Oridecon break; } mes "[Blacksmith Mighty Hammer]"; @@ -165,10 +165,10 @@ lhz_in02,280,19,3 duplicate(MightyHammer) Mighty Hammer#lhz 4_M_DWARF mes "Which equipment do you want to refine?"; next; setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) - set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Unequipped]")+":"; - set .@part, select(.@menu$); + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) + .@menu$ += ((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Unequipped]")+":"; + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Basta]"; switch(.@part) { @@ -219,17 +219,17 @@ lhz_in02,280,19,3 duplicate(MightyHammer) Mighty Hammer#lhz 4_M_DWARF switch(getequipweaponlv(.@part)) { default: case 0: - set .@price,100000; - set .@material,6225; //HD_Carnium - set .@type$,"armor"; + .@price = 100000; + .@material = 6225; //HD_Carnium + .@type$ = "armor"; break; case 1: case 2: case 3: case 4: - set .@price,100000; - set .@material,6226; //HD_Bradium - set .@type$,"weapon"; + .@price = 100000; + .@material = 6226; //HD_Bradium + .@type$ = "weapon"; break; } mes "[Basta]"; diff --git a/npc/re/merchants/quivers.txt b/npc/re/merchants/quivers.txt index 03730a04a..649da8529 100644 --- a/npc/re/merchants/quivers.txt +++ b/npc/re/merchants/quivers.txt @@ -73,10 +73,10 @@ S_BuyQuiver: next; switch(select("Trade all the arrows you have:Get only one quiver:Don't trade")) { case 1: - set .@arrows, countitem(getarg(0)); - set .@quiver, .@arrows / getarg(1); - set .@arrows_used, .@quiver * getarg(1); - set .@arrow_zeny01, .@quiver * getarg(2); + .@arrows = countitem(getarg(0)); + .@quiver = .@arrows / getarg(1); + .@arrows_used = .@quiver * getarg(1); + .@arrow_zeny01 = .@quiver * getarg(2); mes "The number of arrows you have : ^3131FF"+.@arrows+"^000000"; mes "The number of quivers available : ^3131FF"+.@quiver+"^000000"; mes "Zeny needed for trade : ^3131FF"+.@arrow_zeny01+" zeny^000000"; @@ -90,10 +90,10 @@ S_BuyQuiver: } break; case 2: - set .@quiver, 1; - set .@arrows_used, getarg(1); - set .@arrow_zeny01, getarg(2); - set .@zeny_mes,1; + .@quiver = 1; + .@arrows_used = getarg(1); + .@arrow_zeny01 = getarg(2); + .@zeny_mes = 1; break; case 3: mes "[Quiver Maker]"; diff --git a/npc/re/merchants/refine.txt b/npc/re/merchants/refine.txt index db57a1d5d..490f10b5c 100644 --- a/npc/re/merchants/refine.txt +++ b/npc/re/merchants/refine.txt @@ -54,20 +54,20 @@ function script refinenew { next; setarray .@position$[1],"Head","Body","Left hand","Right hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) { + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) { if (getequipisequiped(.@i)) { - set .@menu$, .@menu$ + .@position$[.@i] + "-" + "[" + getequipname(.@i) + "]"; - set .@equipped,1; + .@menu$ += .@position$[.@i] + "-" + "[" + getequipname(.@i) + "]"; + .@equipped = 1; } - set .@menu$, .@menu$ + ":"; + .@menu$ += ":"; } if (.@equipped == 0) { mes "[" + getarg(0) + "]"; mes "I don't think I can refine any items you have..."; close; } - set .@part, select(.@menu$); + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { //custom check mes "[" + getarg(0) + "]"; @@ -95,27 +95,27 @@ function script refinenew { mes "refined as it gets!"; close; } - set .@refineitemid, getequipid(.@part); // save id of the item - set .@refinerycnt, getequiprefinerycnt(.@part); //save refinery count + .@refineitemid = getequipid(.@part); // save id of the item + .@refinerycnt = getequiprefinerycnt(.@part); //save refinery count if ((getequipweaponlv(.@part) >= 1) && (getequipweaponlv(.@part) <= 4)) { - set .@type$,"weapon"; - set .@material,6224; //Bradium - set .@price,100000; + .@type$ = "weapon"; + .@material = 6224; //Bradium + .@price = 100000; switch(getequipweaponlv(.@part)) { - case 1: set .@safe,10; break; - case 2: set .@safe,10; break; - case 3: set .@safe,10; break; - case 4: set .@safe,10; break; + case 1: .@safe = 10; break; + case 2: .@safe = 10; break; + case 3: .@safe = 10; break; + case 4: .@safe = 10; break; } mes "["+ getarg(0) +"]"; mes "Hmm a weapon, is that ok?"; mes "If you want to refine this weapon,"; mes "I will need 1 ^003366Bradium^000000 and 100,000 zeny."; } else { - set .@type$,"armor"; - set .@material,6223; //Carnium - set .@price,100000; - set .@safe,10; + .@type$ = "armor"; + .@material = 6223; //Carnium + .@price = 100000; + .@safe = 10; mes "["+ getarg(0) +"]"; mes "Hmm an armor, is that ok?"; mes "If you want to refine this armor,"; @@ -222,26 +222,26 @@ function script refinenew { mes "[" + getarg(0) + "]"; mes "I can refine this to the safe limit or a desired number of times. It's your choice."; next; - set .@menu2,select("To the safe limit, please.","I'll decide how many times.","I've changed my mind..."); + .@menu2 = select("To the safe limit, please.","I'll decide how many times.","I've changed my mind..."); } else - set .@menu2,2; + .@menu2 = 2; switch(.@menu2){ case 1: - set .@refinecnt,.@safe - getequiprefinerycnt(.@part); + .@refinecnt = .@safe - getequiprefinerycnt(.@part); break; case 2: mes "[" + getarg(0) + "]"; mes "How many times would you like me to refine your item?"; next; input .@refinecnt; - set .@refinecheck,.@refinecnt + getequiprefinerycnt(.@part); + .@refinecheck = .@refinecnt + getequiprefinerycnt(.@part); if (.@refinecnt < 1 || .@refinecheck > 20) { mes "[" + getarg(0) + "]"; mes "I can't refine this item that many times."; close; } if (.@refinecheck > .@safe) { - set .@refinecheck,.@refinecheck - .@safe; + .@refinecheck -= .@safe; mes "[" + getarg(0) + "]"; mes "This will try to refine the equipment " + .@refinecheck + " times past the safe limit. Your equipment may be destroyed... is that ok?"; next; @@ -257,7 +257,7 @@ function script refinenew { mes "You said so... So be it."; close; } - set .@fullprice,.@price * .@refinecnt; + .@fullprice = .@price * .@refinecnt; mes "[" + getarg(0) + "]"; mes "That will cost you " + .@refinecnt + " " + getitemname(.@material) + " and " + .@fullprice + " Zeny. Is that ok?"; next; @@ -290,7 +290,7 @@ function script refinenew { if (getequippercentrefinery(.@part) > rand(100)) { mes "Clang! Clang! Clang! Clang!"; successrefitem .@part; - set .@refinecnt,.@refinecnt - 1; + --.@refinecnt; next; } else { if (rand(100) < 80) { @@ -402,10 +402,10 @@ malangdo,224,172,6 script Clink#mal_normal 4_CAT_SAILOR1,{ mes "Yes!!! You!! You want to refine?"; next; setarray .@position$[1],"Head","Body","Left Hand","Right Hand","Robe","Shoes","Accessory 1","Accessory 2","Head 2","Head 3"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) - set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Empty]")+":"; - set .@part, select(.@menu$); + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) + .@menu$ += ((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"-[Empty]")+":"; + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Clink]"; switch(.@part) { @@ -452,34 +452,34 @@ malangdo,224,172,6 script Clink#mal_normal 4_CAT_SAILOR1,{ switch(getequipweaponlv(.@part)) { default: case 0: // Armor - set .@price,2000; - set .@material,985; //Elunium - set .@type$,"armor"; + .@price = 2000; + .@material = 985; //Elunium + .@type$ = "armor"; mes "Hmm, an armor refine? Someone like you?"; break; case 1: // Level 1 Weapon - set .@price,50; - set .@material,1010; //Phracon - set .@type$,"weapon"; + .@price = 50; + .@material = 1010; //Phracon + .@type$ = "weapon"; mes "A level 1 weapon?"; mes "Urr... Annoying... Okay, let's try..."; break; case 2: // Level 2 Weapon - set .@price,200; - set .@material,1011; //Emveretarcon - set .@type$,"weapon"; + .@price = 200; + .@material = 1011; //Emveretarcon + .@type$ = "weapon"; mes "A level 2 weapon?"; break; case 3: // Level 3 Weapon - set .@price,20000; - set .@material,984; //Oridecon - set .@type$,"weapon"; + .@price = 20000; + .@material = 984; //Oridecon + .@type$ = "weapon"; mes "Woot!! A level 3 weapon? Impressive~"; break; case 4: // Level 4 Weapon - set .@price,50000; - set .@material,984; //Oridecon - set .@type$,"weapon"; + .@price = 50000; + .@material = 984; //Oridecon + .@type$ = "weapon"; mes "Wow!... A level 4 weapon~!!"; break; } diff --git a/npc/re/merchants/ticket_refiner.txt b/npc/re/merchants/ticket_refiner.txt index d5d4dd59f..aa768f20b 100644 --- a/npc/re/merchants/ticket_refiner.txt +++ b/npc/re/merchants/ticket_refiner.txt @@ -16,9 +16,9 @@ prontera,184,177,6 script Refine Master 4_M_REPAIR,{ disable_items; if (countitem(6238) || countitem(6228) || countitem(6229) || countitem(6230) || countitem(6231) || countitem(6456)) - set .@bWeaponUp,1; + .@bWeaponUp = 1; if (countitem(6239) || countitem(6232) || countitem(6233) || countitem(6234) || countitem(6235) || countitem(6457)) - set .@bArmorUp,1; + .@bArmorUp = 1; if (!.@bWeaponUp && !.@bArmorUp) { mes "[Refine Master]"; mes "Hello!"; @@ -55,10 +55,10 @@ prontera,184,177,6 script Refine Master 4_M_REPAIR,{ mes "Which equipment would you like to refine?"; next; setarray .@position$[1],"Head upper","Armor","Left hand","Right hand","Robe","Shoes","Accessory 1","Accessory 2","Head middle","Head lower"; - set .@menu$,""; - for(set .@i,1; .@i<=10; set .@i,.@i+1) - set .@menu$, .@menu$+((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"- [Empty]")+":"; - set .@part, select(.@menu$); + .@menu$ = ""; + for(.@i = 1; .@i<=10; ++.@i) + .@menu$ += ((getequipisequiped(.@i))?getequipname(.@i):.@position$[.@i]+"- [Empty]")+":"; + .@part = select(.@menu$); if (!getequipisequiped(.@part)) { mes "[Refine Master]"; mes "You have to equip the item you want to refine."; @@ -76,8 +76,8 @@ prontera,184,177,6 script Refine Master 4_M_REPAIR,{ case 0: setarray .@tickets[0],6457,6235,6234,6233,6232,6239; setarray .@levels[0],5,6,7,8,9,11; - set .@type$,"Armor"; - set .@check,.@bArmorUp; + .@type$ = "Armor"; + .@check = .@bArmorUp; break; case 1: case 2: @@ -85,8 +85,8 @@ prontera,184,177,6 script Refine Master 4_M_REPAIR,{ case 4: setarray .@tickets[0],6456,6231,6230,6229,6228,6238; setarray .@levels[0],5,6,7,8,9,11; - set .@type$,"Weapon"; - set .@check,.@bWeaponUp; + .@type$ = "Weapon"; + .@check = .@bWeaponUp; break; } if (!.@check) { @@ -99,12 +99,12 @@ prontera,184,177,6 script Refine Master 4_M_REPAIR,{ mes "[Refine Master]"; mes "Please choose which ^006400"+.@type$+" Refine Ticket^000000 you want to use."; next; - set .@menu$,""; - for(set .@i,0; .@i<getarraysize(.@tickets); set .@i,.@i+1) - set .@menu$, .@menu$+getitemname(.@tickets[.@i])+":"; - set .@select, select(.@menu$)-1; - set .@ticket_lv, .@levels[.@select]; - set .@ticket_id, .@tickets[.@select]; + .@menu$ = ""; + for(.@i = 0; .@i<getarraysize(.@tickets); ++.@i) + .@menu$ += getitemname(.@tickets[.@i])+":"; + .@select = select(.@menu$)-1; + .@ticket_lv = .@levels[.@select]; + .@ticket_id = .@tickets[.@select]; if (countitem(.@ticket_id) == 0) { emotion e_what; mes "[Refine Master]"; @@ -146,7 +146,7 @@ prontera,184,177,6 script Refine Master 4_M_REPAIR,{ mes "Please report this."; close; } - for(set .@i,getequiprefinerycnt(.@part); .@i<.@ticket_lv; set .@i,.@i+1) + for(.@i = getequiprefinerycnt(.@part); .@i<.@ticket_lv; ++.@i) successrefitem .@part; next; emotion e_ho; diff --git a/npc/re/mobs/dungeons/lhz_dun.txt b/npc/re/mobs/dungeons/lhz_dun.txt index 8da7874bf..16296e20e 100644 --- a/npc/re/mobs/dungeons/lhz_dun.txt +++ b/npc/re/mobs/dungeons/lhz_dun.txt @@ -73,26 +73,26 @@ OnTimer6000000: // delay1 = 6000000 ms (100 min) OnInit: // Select Coordinates to summon a random MVP on switch(rand(1,6)) { - case 1: set .@x,140; set .@y,232; break; - case 2: set .@x,75; set .@y,138; break; - case 3: set .@x,140; set .@y,87; break; - case 4: set .@x,205; set .@y,140; break; - case 5: set .@x,123; set .@y,137; break; - case 6: set .@x,175; set .@y,137; break; + case 1: .@x = 140; .@y = 232; break; + case 2: .@x = 75; .@y = 138; break; + case 3: .@x = 140; .@y = 87; break; + case 4: .@x = 205; .@y = 140; break; + case 5: .@x = 123; .@y = 137; break; + case 6: .@x = 175; .@y = 137; break; } - set .@mob,rand(1646,1651); + .@mob = rand(1646,1651); monster "lhz_dun03",.@x,.@y,strmobinfo(1,.@mob),.@mob,1,strnpcinfo(3)+"::OnMyMVPDead"; // Select Coordinates to summon a random 99 on switch(rand(1,6)) { - case 1: set .@x2,183; set .@y2,97; break; - case 2: set .@x2,97; set .@y2,96; break; - case 3: set .@x2,47; set .@y2,139; break; - case 4: set .@x2,231; set .@y2,140; break; - case 5: set .@x2,139; set .@y2,211; break; - case 6: set .@x2,139; set .@y2,259; break; + case 1: .@x2 = 183; .@y2 = 97; break; + case 2: .@x2 = 97; .@y2 = 96; break; + case 3: .@x2 = 47; .@y2 = 139; break; + case 4: .@x2 = 231; .@y2 = 140; break; + case 5: .@x2 = 139; .@y2 = 211; break; + case 6: .@x2 = 139; .@y2 = 259; break; } - set .@mob2,rand(1640,1645); + .@mob2 = rand(1640,1645); monster "lhz_dun03",.@x2,.@y2,strmobinfo(1,.@mob2),.@mob2,1,strnpcinfo(3)+"::OnMy99Dead"; end; @@ -128,28 +128,28 @@ OnTimer6000000: // delay1 = 6000000 ms (100 min) OnInit: // Select Coordinates to summon a random MVP on switch(rand(1,7)) { - case 1: set .@x,77; set .@y,251; break; - case 2: set .@x,147; set .@y,224; break; - case 3: set .@x,219; set .@y,219; break; - case 4: set .@x,244; set .@y,120; break; - case 5: set .@x,149; set .@y,41; break; - case 6: set .@x,53; set .@y,109; break; - case 7: set .@x,149; set .@y,151; break; + case 1: .@x = 77; .@y = 251; break; + case 2: .@x = 147; .@y = 224; break; + case 3: .@x = 219; .@y = 219; break; + case 4: .@x = 244; .@y = 120; break; + case 5: .@x = 149; .@y = 41; break; + case 6: .@x = 53; .@y = 109; break; + case 7: .@x = 149; .@y = 151; break; } - set .@mob,rand(2235,2241); + .@mob = rand(2235,2241); monster "lhz_dun04",.@x,.@y,strmobinfo(1,.@mob),.@mob,1,strnpcinfo(3)+"::OnMyMVPDead"; // Select Coordinates to summon a random 99 on switch(rand(1,7)) { - case 1: set .@x2,77; set .@y2,251; break; - case 2: set .@x2,147; set .@y2,224; break; - case 3: set .@x2,219; set .@y2,219; break; - case 4: set .@x2,244; set .@y2,120; break; - case 5: set .@x2,149; set .@y2,41; break; - case 6: set .@x2,53; set .@y2,109; break; - case 7: set .@x2,149; set .@y2,151; break; + case 1: .@x2 = 77; .@y2 = 251; break; + case 2: .@x2 = 147; .@y2 = 224; break; + case 3: .@x2 = 219; .@y2 = 219; break; + case 4: .@x2 = 244; .@y2 = 120; break; + case 5: .@x2 = 149; .@y2 = 41; break; + case 6: .@x2 = 53; .@y2 = 109; break; + case 7: .@x2 = 149; .@y2 = 151; break; } - set .@mob2,rand(2228,2234); + .@mob2 = rand(2228,2234); monster "lhz_dun04",.@x2,.@y2,strmobinfo(1,.@mob2),.@mob2,1,strnpcinfo(3)+"::OnMy99Dead"; end; diff --git a/npc/re/other/resetskill.txt b/npc/re/other/resetskill.txt index f3415e6c9..a237fcf24 100644 --- a/npc/re/other/resetskill.txt +++ b/npc/re/other/resetskill.txt @@ -61,10 +61,10 @@ izlude,127,175,3 script Hypnotist#novice 4_F_TELEPORTER,{ mes "work, or will backfire..."; close; case 2: - set .@str$,"Stat"; + .@str$ = "Stat"; case 3: if (.@str$ == "") - set .@str$,"Skill"; + .@str$ = "Skill"; mes "[Hypnotist]"; mes "Are you sure that you"; mes "want to proceed with"; diff --git a/npc/re/other/stone_change.txt b/npc/re/other/stone_change.txt index cfb2aa5eb..f99ae28c5 100644 --- a/npc/re/other/stone_change.txt +++ b/npc/re/other/stone_change.txt @@ -25,14 +25,14 @@ geffen_in,99,174,5 script Ore Tester#sorty 8_F_GIRL,{ mes "[Ore Tester Sorty]"; mes "So, would you like me to organize your ores?"; next; - set .@i, select("Steel, please.:Iron, please.:Iron Ore, please.:Rough Oridecon, please.:No, thanks."); + .@i = select("Steel, please.:Iron, please.:Iron Ore, please.:Rough Oridecon, please.:No, thanks."); if (.@i == 5) { mes "[Ore Tester Sorty]"; mes "Huh, I really hate messy people!"; close; } setarray .@ores[0],999,998,1002,756; - set .@item, .@ores[.@i-1]; + .@item = .@ores[.@i-1]; if (countitem(.@item) == 0) { mes "[Ore Tester Sorty]"; mes "You don't have any "+getitemname(.@item)+"..."; @@ -40,8 +40,8 @@ geffen_in,99,174,5 script Ore Tester#sorty 8_F_GIRL,{ } while(1) { if (countitem(.@item)) { - set .@count, countitem(.@item); - set .@total, .@total + .@count; + .@count = countitem(.@item); + .@total += .@count; delitem .@item, .@count; } else { getitem .@item, .@total; diff --git a/npc/re/warps/cities/dicastes.txt b/npc/re/warps/cities/dicastes.txt index 9af35d123..1d1476830 100644 --- a/npc/re/warps/cities/dicastes.txt +++ b/npc/re/warps/cities/dicastes.txt @@ -41,21 +41,21 @@ dic_in01,242,182,0 script #eldicastes0016 CLEAR_NPC,{ // Elevators - script Elevator#main -1,{ - set .@n, atoi(strnpcinfo(2)); - set .@eq, (isequipped(2782))?1:0; + .@n = atoi(strnpcinfo(2)); + .@eq = (isequipped(2782))?1:0; if (.@n <= 4) { - set .@m$, (.@eq)?"Civil Services:Archive Room:Situation Room:Administrative Office":"¢³¡ð¡Ð:¡ñ¡ñ¡ò:¡ø¡ø¡ð:¡÷¡ú¡ð"; + .@m$ = (.@eq)?"Civil Services:Archive Room:Situation Room:Administrative Office":"¢³¡ð¡Ð:¡ñ¡ñ¡ò:¡ø¡ø¡ð:¡÷¡ú¡ð"; setarray .@xy, 45,286,36,212,122,282,121,201; } else if (.@n <= 11) { - set .@m$, (.@eq)?"Residential Zone 1:Residential Zone 2:Residential Zone 3:Pub Burman Flone":"¡ô¡õ¡ñ ¡þ :¢³¡ü¡Ð ¡ú :¡ï¢³¢¤ ¢² :¢±¡Ð¡ñ"; + .@m$ = (.@eq)?"Residential Zone 1:Residential Zone 2:Residential Zone 3:Pub Burman Flone":"¡ô¡õ¡ñ ¡þ :¢³¡ü¡Ð ¡ú :¡ï¢³¢¤ ¢² :¢±¡Ð¡ñ"; setarray .@xy, 42,115,110,108,178,108,260,115; } else if (.@n <= 13) { - set .@m$, (.@eq)?"Battle Station:Galten Quarters":"¡ø¡ô¡ï ¡ò :¡ü¡÷¡ó ¡÷ "; + .@m$ = (.@eq)?"Battle Station:Galten Quarters":"¡ø¡ô¡ï ¡ò :¡ü¡÷¡ó ¡÷ "; setarray .@xy, 385,272,385,208; } - set .@m, select(.@m$) - 1; + .@m = select(.@m$) - 1; warp "dic_in01",.@xy[.@m*2],.@xy[.@m*2+1]; end; } diff --git a/npc/re/warps/cities/malaya.txt b/npc/re/warps/cities/malaya.txt index 190f1831a..d6102dc48 100644 --- a/npc/re/warps/cities/malaya.txt +++ b/npc/re/warps/cities/malaya.txt @@ -92,7 +92,7 @@ OnTouch: function script F_Malaya_Warp { mes "Where would you like to go?"; next; - set .@i$, getarg(select("Back outside",getarg(1)+" Jeepney",getarg(2)+" Jeepney") - 1); + .@i$ = getarg(select("Back outside",getarg(1)+" Jeepney",getarg(2)+" Jeepney") - 1); close2; switch(getarg(3)) { case 1: // 12 passenger diff --git a/npc/re/warps/fields/morroc_fild.txt b/npc/re/warps/fields/morroc_fild.txt index 3b40d2443..3e4084640 100644 --- a/npc/re/warps/fields/morroc_fild.txt +++ b/npc/re/warps/fields/morroc_fild.txt @@ -42,7 +42,7 @@ moc_fild03,70,341,0 warp mocf04-1 5,2,moc_fild02,332,23 //moc_fild04,14,98,0 warp mocf07 1,11,moc_fild05,378,119 //moc_fild04,175,18,0 warp mocf08 3,2,moc_fild08,170,380 //moc_fild04,19,206,0 warp mocf09 3,15,moc_fild05,373,208 -//moc_fild04,219,327,0 script mocf016 WARPNPC,3,4,{ set @anthell,0; warp "anthell01",35,262; } +//moc_fild04,219,327,0 script mocf016 WARPNPC,3,4,{ @anthell = 0; warp "anthell01",35,262; } //moc_fild04,292,381,0 warp mocf01-2 10,1,moc_fild01,76,25 //moc_fild04,314,381,0 warp mocf01-3 10,1,moc_fild01,76,25 //moc_fild04,336,381,0 warp mocf01-4 10,1,moc_fild01,76,25 @@ -95,7 +95,7 @@ moc_fild13,308,49,0 warp mocf06-1 2,4,moc_fild03,20,37 //moc_fild14,196,382,0 warp mocf16-1 4,2,moc_fild08,204,19 //moc_fild15,104,16,0 warp mocf26 9,2,moc_fild16,125,380 //moc_fild15,158,363,0 warp mocf18-1 6,2,moc_fild09,126,23 -//moc_fild15,258,253,0 script mocf017 WARPNPC,3,3,{ set @anthell,1; warp "anthell01",35,262; } +//moc_fild15,258,253,0 script mocf017 WARPNPC,3,3,{ @anthell = 1; warp "anthell01",35,262; } //moc_fild15,348,18,0 warp mocf27 5,2,moc_fild16,334,379 //moc_fild15,367,276,0 warp mocf25-1 2,4,moc_fild14,19,278 //moc_fild15,38,105,0 warp mocf23-1 2,4,moc_fild11,376,197 |