summaryrefslogtreecommitdiff
path: root/npc/merchants
diff options
context:
space:
mode:
Diffstat (limited to 'npc/merchants')
-rw-r--r--npc/merchants/advanced_refiner.txt12
-rw-r--r--npc/merchants/alchemist.txt4
-rw-r--r--npc/merchants/cashheadgear_dye.txt38
-rw-r--r--npc/merchants/clothes_dyer.txt14
-rw-r--r--npc/merchants/coin_exchange.txt14
-rw-r--r--npc/merchants/dye_maker.txt38
-rw-r--r--npc/merchants/elemental_trader.txt14
-rw-r--r--npc/merchants/enchan_arm.txt54
-rw-r--r--npc/merchants/gemstone.txt2
-rw-r--r--npc/merchants/hair_dyer.txt60
-rw-r--r--npc/merchants/hair_style.txt36
-rw-r--r--npc/merchants/hd_refine.txt36
-rw-r--r--npc/merchants/milk_trader.txt6
-rw-r--r--npc/merchants/novice_exchange.txt2
-rw-r--r--npc/merchants/old_pharmacist.txt10
-rw-r--r--npc/merchants/quivers.txt8
-rw-r--r--npc/merchants/refine.txt146
-rw-r--r--npc/merchants/renters.txt36
-rw-r--r--npc/merchants/socket_enchant.txt2
-rw-r--r--npc/merchants/socket_enchant2.txt4
20 files changed, 267 insertions, 269 deletions
diff --git a/npc/merchants/advanced_refiner.txt b/npc/merchants/advanced_refiner.txt
index 853e82f5e..6d19d68e4 100644
--- a/npc/merchants/advanced_refiner.txt
+++ b/npc/merchants/advanced_refiner.txt
@@ -35,20 +35,20 @@ payon,157,146,6 script Suhnbi#cash 4_M_03,{
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 "[Suhnbi]";
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
close;
diff --git a/npc/merchants/alchemist.txt b/npc/merchants/alchemist.txt
index dfb9a68b4..91dc048c9 100644
--- a/npc/merchants/alchemist.txt
+++ b/npc/merchants/alchemist.txt
@@ -60,8 +60,8 @@ alde_alche,24,188,3 script Guild Dealer 2_M_ALCHE,{
break;
}
}
- set .@sell,.@input * 8;
- set .@item_weight,.@input * 10;
+ .@sell = .@input * 8;
+ .@item_weight = .@input * 10;
if (Zeny < .@sell) {
mes "[Gever Al Sharp]";
mes "You don't";
diff --git a/npc/merchants/cashheadgear_dye.txt b/npc/merchants/cashheadgear_dye.txt
index f2d739aba..f9a6cd089 100644
--- a/npc/merchants/cashheadgear_dye.txt
+++ b/npc/merchants/cashheadgear_dye.txt
@@ -15,7 +15,7 @@
prt_in,253,168,4 script Alora 4_F_LGTGIRL,{
// Mysterious Dyestuff
- set .@dyeID, 6220;
+ .@dyeID = 6220;
// Headgear Choices
setarray .@hgn$[1], "Mage Hat","Beanie","Drooping Cat","Deviruchi Hat","Wig","Ribbon","Magestic Goat";
// Mage Hats - Normal, Yellow, Blue, Brown, Gray, Red
@@ -39,12 +39,12 @@ prt_in,253,168,4 script Alora 4_F_LGTGIRL,{
mes "[Alora]";
mes "Do you have a headgear that you would like to dye?";
next;
- for(set .@i,1; .@i < getarraysize(.@hgn$); set .@i,.@i+1) {
- if(.@i == 1) set .@menu$, .@hgn$[.@i];
- else set .@menu$, .@menu$ +":"+ .@hgn$[.@i];
+ for(.@i = 1; .@i < getarraysize(.@hgn$); ++.@i) {
+ if(.@i == 1) .@menu$ = .@hgn$[.@i];
+ else .@menu$ += ":"+ .@hgn$[.@i];
}
- set .@menu$, .@menu$ +":Cancel";
- set .@t, select(.@menu$);
+ .@menu$ += ":Cancel";
+ .@t = select(.@menu$);
if(.@t == getarraysize(.@hgn$)) {
mes "[Alora]";
mes "Have a good journey adventurer!";
@@ -54,24 +54,24 @@ prt_in,253,168,4 script Alora 4_F_LGTGIRL,{
mes "[Alora]";
mes "Okay, what color do you want to change it to?";
next;
- for(set .@i,1; .@i < getarraysize(getd(".@hg_"+.@t+"")); set .@i,.@i+1) {
+ for(.@i = 1; .@i < getarraysize(getd(".@hg_"+.@t+"")); ++.@i) {
if(.@i == 1 && .@t != 5)
- set .@menu$, "Normal";
+ .@menu$ = "Normal";
else if(.@i == 1 && .@t == 5)
- set .@menu$, getitemname(getd(".@hg_"+.@t+"["+.@i+"]"));
+ .@menu$ = getitemname(getd(".@hg_"+.@t+"["+.@i+"]"));
else {
sscanf(getitemname(getd(".@hg_"+.@t+"["+.@i+"]")),"%s "+ .@hgn$[.@t],.@colour$);
- set .@menu$, .@menu$ +":"+ .@colour$;
+ .@menu$ += ":"+ .@colour$;
}
}
- set .@menu$, .@menu$ +":Cancel";
- set .@c, select(.@menu$);
+ .@menu$ += ":Cancel";
+ .@c = select(.@menu$);
if(.@c == getarraysize(getd(".@hg_"+.@t+""))) {
mes "[Alora]";
mes "Oh, okay no problem!";
close;
}
- set .@dyHG, getd(".@hg_"+.@t+"["+.@c+"]");
+ .@dyHG = getd(".@hg_"+.@t+"["+.@c+"]");
mes "[Alora]";
mes "Oh I'm so excited aren't you?";
mes "And just to be sure, what color is the "+ .@hgn$[.@t] +" you want me to use?";
@@ -85,18 +85,18 @@ prt_in,253,168,4 script Alora 4_F_LGTGIRL,{
mes "["+ strcharinfo(0) +"]";
mes "Ok, thanks for the warning, I think I'll give you my";
next;
- set .@menu$, "Nevermind";
- for(set .@i,1; .@i < getarraysize(getd(".@hg_"+.@t+"")); set .@i,.@i+1) {
- if(.@i == 1) set .@menu$, .@menu$ +":Normal "+ getitemname(getd(".@hg_"+.@t+"["+.@i+"]"));
- else set .@menu$, .@menu$ +":"+ getitemname(getd(".@hg_"+.@t+"["+.@i+"]"));
+ .@menu$ = "Nevermind";
+ for(.@i = 1; .@i < getarraysize(getd(".@hg_"+.@t+"")); ++.@i) {
+ if(.@i == 1) .@menu$ += ":Normal "+ getitemname(getd(".@hg_"+.@t+"["+.@i+"]"));
+ else .@menu$ += ":"+ getitemname(getd(".@hg_"+.@t+"["+.@i+"]"));
}
- set .@mine, select(.@menu$) - 1;
+ .@mine = select(.@menu$) - 1;
if(!.@mine) {
mes "[Alora]";
mes "It's best to be very sure, have a safe journey.";
close;
}
- set .@myHG, getd(".@hg_"+.@t+"["+.@mine+"]");
+ .@myHG = getd(".@hg_"+.@t+"["+.@mine+"]");
if(.@dyHG == .@myHG) {
mes "[Alora]";
mes "Woah what happened?";
diff --git a/npc/merchants/clothes_dyer.txt b/npc/merchants/clothes_dyer.txt
index 94fab1d5c..b7e90febf 100644
--- a/npc/merchants/clothes_dyer.txt
+++ b/npc/merchants/clothes_dyer.txt
@@ -22,9 +22,9 @@
prt_in,284,168,2 script Dyer Ginedin Rephere 1_M_JOBTESTER,{
function Dyes;
- set .@EnableDyes,1; // Disable (set to 0) if palettes cause errors [see note v2.4]
+ .@EnableDyes = 1; // Disable (set to 0) if palettes cause errors [see note v2.4]
- set .n$,"[Dyer Ginedin Rephere]";
+ .n$ = "[Dyer Ginedin Rephere]";
mes .n$;
mes "11... 12... Mmm... good. I think I'll be able to finish before tonight's party. Oh! I didn't notice you were here!";
while(1) {
@@ -135,11 +135,11 @@ L_End:
function Dyes {
setarray .@DyeName$[0],"the default color","Orange","Violet","Red","Black","Green","Blue","White","Yellow";
setarray .@DyeItems[0],0,980,981,975,983,979,978,982,976;
- set .@menu$,"- Default:";
- for(set .@i,0; .@i<getargcount(); set .@i,.@i+2)
- set .@menu$, .@menu$+"- "+.@DyeName$[getarg(.@i)]+":";
- set .@menu$, .@menu$+"- ^777777Cancel^000000";
- set .@s, select(.@menu$)-1;
+ .@menu$ = "- Default:";
+ for(.@i = 0; .@i<getargcount(); .@i += 2)
+ .@menu$ += "- "+.@DyeName$[getarg(.@i)]+":";
+ .@menu$ += "- ^777777Cancel^000000";
+ .@s = select(.@menu$)-1;
if (.@s == (getargcount()/2)+1) goto L_End;
mes .n$;
if (.@s == 0) {
diff --git a/npc/merchants/coin_exchange.txt b/npc/merchants/coin_exchange.txt
index 160a7e5bc..5a63c5708 100644
--- a/npc/merchants/coin_exchange.txt
+++ b/npc/merchants/coin_exchange.txt
@@ -16,7 +16,7 @@
// Manuk & Splendide
//============================================================
- script ::merchant_13_2 -1,{
- set .@n$, "["+strnpcinfo(1)+"]";
+ .@n$ = "["+strnpcinfo(1)+"]";
mes .@n$;
if (isequipped(2782) && ep13_2_rhea == 100) {
if (!checkweight(1201,1)) {
@@ -29,15 +29,15 @@
next;
if (strnpcinfo(1) == "Merchant of Manuk") {
setarray .@items[2],12342,12343,12348;
- set .@Book,11019; //Manuk_Selling_Item
- set .@coin,6080; //Manuk_Coin
- set .@i, select("View item description:Manuk's Opportunity:Manuk's Courage:Manuk's Faith:Cancel");
+ .@Book = 11019; //Manuk_Selling_Item
+ .@coin = 6080; //Manuk_Coin
+ .@i = select("View item description:Manuk's Opportunity:Manuk's Courage:Manuk's Faith:Cancel");
}
else {
setarray .@items[2],12344,12345,12349;
- set .@Book,11018; //Splendide_Selling_Item
- set .@coin,6081; //Splendide_Coin
- set .@i, select("View item description:Buy Pinguicula's Fruit Jam:Buy Luciola's Honey Jam:Buy Cornus' Tears:Do nothing");
+ .@Book = 11018; //Splendide_Selling_Item
+ .@coin = 6081; //Splendide_Coin
+ .@i = select("View item description:Buy Pinguicula's Fruit Jam:Buy Luciola's Honey Jam:Buy Cornus' Tears:Do nothing");
}
mes .@n$;
if (.@i == 1) {
diff --git a/npc/merchants/dye_maker.txt b/npc/merchants/dye_maker.txt
index b8ca80d06..bca4ef276 100644
--- a/npc/merchants/dye_maker.txt
+++ b/npc/merchants/dye_maker.txt
@@ -105,57 +105,57 @@ S_MakeDye:
mes "Mmm... I need 30 Red Herbs, 1 Counteragent, and 1 Empty Bottle to make Red Dyestuffs. The fee is only 3000 zeny to make it.";
setarray .@item[0], 507, 973, 713;
setarray .@count[0], 30, 1, 1;
- set .@cost,3000;
- set .@dyestuff,975;
+ .@cost = 3000;
+ .@dyestuff = 975;
break;
case 2:
mes "Mmm... I need 30 Yellow Herbs, 1 Couneragent, and 1 Empty Bottle to make Lemon Dyestuffs. The fee is only 3000 zeny to make it.";
setarray .@item[0], 508, 973, 713;
setarray .@count[0], 30, 1, 1;
- set .@cost,3000;
- set .@dyestuff,976;
+ .@cost = 3000;
+ .@dyestuff = 976;
break;
case 3:
mes "Mmm... I need 20 Blue Herbs, 1 Counteragent, and 1 Empty Bottle to make Cobaltblue Dyestuff. It's hard to use the Blue Herb, so the fee is going to be 3500 zeny.";
setarray .@item[0], 510, 973, 713;
setarray .@count[0], 20, 1, 1;
- set .@cost,3500;
- set .@dyestuff,978;
+ .@cost = 3500;
+ .@dyestuff = 978;
break;
case 4:
mes "Mmm... I need 5 Blue Herbs, 20 Green Herbs, 20 Yellow Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle to make Darkgreen Dyestuffs. Don't get all of the materials confused. The fee is only 5000 zeny.";
setarray .@item[0], 510, 511, 508, 974, 973, 713;
setarray .@count[0], 5, 20, 20, 1, 1, 1;
- set .@cost,5000;
- set .@dyestuff,979;
+ .@cost = 5000;
+ .@dyestuff = 979;
break;
case 5:
mes "Mmm... I need 20 Red Herbs, 20 Yellow Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle to make Orange Dyestuff. The fee is going to be 5000 zeny.";
setarray .@item[0], 507, 508, 974, 973, 713;
setarray .@count[0], 20, 20, 1, 1, 1;
- set .@cost,5000;
- set .@dyestuff,980;
+ .@cost = 5000;
+ .@dyestuff = 980;
break;
case 6:
mes "Mmm... I need 10 Blue Herbs, 30 Red Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle to make Violet Dyestuffs. The fee will be 5000 zeny.";
setarray .@item[0], 510, 507, 974, 973, 713;
setarray .@count[0], 10, 30, 1, 1, 1;
- set .@cost,5000;
- set .@dyestuff,981;
+ .@cost = 5000;
+ .@dyestuff = 981;
break;
case 7:
mes "Mmm... I need 30 White Herbs, 1 Counteragent, and 1 Empty bottle to make White Dyestuffs. The fee will be 3000 zeny.";
setarray .@item[0], 509, 973, 713;
setarray .@count[0], 30, 1, 1;
- set .@cost,3000;
- set .@dyestuff,982;
+ .@cost = 3000;
+ .@dyestuff = 982;
break;
case 8:
mes "Mmm... I need 30 of each Red, Yellow, and Green Herb, 5 Blue Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle. The process takes longer and more effort than the others, so it is going to be 7000 zeny.";
setarray .@item[0], 507, 508, 511, 510, 974, 973, 713;
setarray .@count[0], 30, 30, 30, 5, 1, 1, 1;
- set .@cost,7000;
- set .@dyestuff,983;
+ .@cost = 7000;
+ .@dyestuff = 983;
break;
}
next;
@@ -168,9 +168,9 @@ S_MakeDye:
}
next;
if (select("Make Dyestuffs:Cancel") == 1) {
- set .@size, getarraysize(.@item);
+ .@size = getarraysize(.@item);
// check requirements
- for( set .@i,0 ; .@i < .@size ; set .@i,.@i+1 )
+ for (.@i = 0; .@i < .@size; ++.@i)
if( countitem(.@item[.@i]) < .@count[.@i] )
break;
if( .@i < .@size || Zeny < .@cost ) {
@@ -180,7 +180,7 @@ S_MakeDye:
close;
}
// delete items
- for (set .@i, 0; .@i < .@size ; set .@i, .@i+1)
+ for (.@i = 0; .@i < .@size; ++.@i)
delitem .@item[.@i], .@count[.@i];
Zeny -= .@cost;
// get dyestuff
diff --git a/npc/merchants/elemental_trader.txt b/npc/merchants/elemental_trader.txt
index a1f255743..bf01c29d3 100644
--- a/npc/merchants/elemental_trader.txt
+++ b/npc/merchants/elemental_trader.txt
@@ -80,7 +80,7 @@ ama_in02,61,27,7 script Alchemist#ama 4_M_ALCHE_B,{
mes "Uh-huh, what did you bring?";
next;
setarray .@items[1],995,997,994,996;
- set .@i, .@items[select("Mystic Frozen:Great Nature:Flame Heart:Rough Wind")];
+ .@i = .@items[select("Mystic Frozen:Great Nature:Flame Heart:Rough Wind")];
mes "[Laspuchin Gregory]";
if (countitem(.@i) > 7) {
mes "I will take 8 of them and";
@@ -91,13 +91,13 @@ ama_in02,61,27,7 script Alchemist#ama 4_M_ALCHE_B,{
mes "[Laspuchin Gregory]";
mes "HeeHee, what do you want? Choose one!";
next;
- set .@menu$, "";
- for(set .@j,1; .@j<5; set .@j,.@j+1) {
- if (.@items[.@j] != .@i) set .@menu$, .@menu$+getitemname(.@items[.@j]);
- set .@menu$, .@menu$+":";
+ .@menu$ = "";
+ for(.@j = 1; .@j < 5; ++.@j) {
+ if (.@items[.@j] != .@i) .@menu$ += getitemname(.@items[.@j]);
+ .@menu$ += ":";
}
- set .@menu$, .@menu$+"Cancel the trade";
- set .@j, select(.@menu$);
+ .@menu$ += "Cancel the trade";
+ .@j = select(.@menu$);
mes "[Laspuchin Gregory]";
if (.@j == 5) {
mes "Oh, well.";
diff --git a/npc/merchants/enchan_arm.txt b/npc/merchants/enchan_arm.txt
index ee3032440..10aecf6ae 100644
--- a/npc/merchants/enchan_arm.txt
+++ b/npc/merchants/enchan_arm.txt
@@ -36,25 +36,25 @@ prontera,165,60,2 script Apprentice Craftsman 1_F_MERCHANT_01,{
switch(select("Non Slotted Armor.:Slotted Armor.:High Grade Armor.:Maybe next time.")) {
case 1:
setarray .@items[0],2307,2309,2314,2316,2321,2325,2327,2328,2330,2332,2334,2335,2341,2344,2346,2348,2350,2337,2386,2394,2395,2396;
- set .@j,50;
+ .@j = 50;
break;
case 2:
setarray .@items[0],2311,2318,2319,2320,2308,2310,2315,2317,2322,2324,2326,2331,2333,2336,2342,2345,2347,2349,2351;
- set .@j,55;
- set .@k,1;
+ .@j = 55;
+ .@k = 1;
break;
case 3:
setarray .@items[0],2364,2365,2391,2374,2375,2376,2377,2378,2379,2380,2381,2382,2387,2388,2389,2390;
- set .@j,60;
+ .@j = 60;
break;
case 4:
mes "[Apprentice Craftsman]";
mes "Please come back when you have any interest in enchanting your armor.";
close;
}
- set .@menu$,"";
- for(set .@i,0; .@i<getarraysize(.@items); set .@i,.@i+1)
- set .@menu$, .@menu$+getitemname(.@items[.@i])+((.@k)?" [1]":"")+":";
+ .@menu$ = "";
+ for(.@i = 0; .@i<getarraysize(.@items); ++.@i)
+ .@menu$ += getitemname(.@items[.@i])+((.@k)?" [1]":"")+":";
callsub S_EnchantArmor, .@items[select(.@menu$)-1], .@j;
end;
}
@@ -65,8 +65,8 @@ prontera,165,60,2 script Apprentice Craftsman 1_F_MERCHANT_01,{
close;
S_EnchantArmor:
- set .@itemid,getarg(0);
- set .@failrate,getarg(1);
+ .@itemid = getarg(0);
+ .@failrate = getarg(1);
mes "[Apprentice Craftsman]";
if (countitem(.@itemid) == 1) {
mes "Socket enchant will cost you 400,000 zeny. And there will be a random option enchanted. Of course, there is a chance of breaking your armor.";
@@ -96,42 +96,42 @@ S_EnchantArmor:
Zeny -= 400000;
delitem .@itemid,1;
switch (rand(1,.@failrate)) {
- case 1: set .@addpart,4702;break;
- case 2: set .@addpart,4712;break;
- case 3: set .@addpart,4722;break;
- case 4: set .@addpart,4732;break;
- case 5: set .@addpart,4742;break;
- case 6: set .@addpart,4752;break;
+ case 1: .@addpart = 4702;break;
+ case 2: .@addpart = 4712;break;
+ case 3: .@addpart = 4722;break;
+ case 4: .@addpart = 4732;break;
+ case 5: .@addpart = 4742;break;
+ case 6: .@addpart = 4752;break;
case 7:
- case 8: set .@addpart,4701;break;
+ case 8: .@addpart = 4701;break;
case 9:
- case 10: set .@addpart,4711;break;
+ case 10: .@addpart = 4711;break;
case 11:
- case 12: set .@addpart,4721;break;
+ case 12: .@addpart = 4721;break;
case 13:
- case 14: set .@addpart,4731;break;
+ case 14: .@addpart = 4731;break;
case 15:
- case 16: set .@addpart,4741;break;
+ case 16: .@addpart = 4741;break;
case 17:
- case 18: set .@addpart,4751;break;
+ case 18: .@addpart = 4751;break;
case 19:
case 20:
- case 21: set .@addpart,4700;break;
+ case 21: .@addpart = 4700;break;
case 22:
case 23:
- case 24: set .@addpart,4710;break;
+ case 24: .@addpart = 4710;break;
case 25:
case 26:
- case 27: set .@addpart,4720;break;
+ case 27: .@addpart = 4720;break;
case 28:
case 29:
- case 30: set .@addpart,4730;break;
+ case 30: .@addpart = 4730;break;
case 31:
case 32:
- case 33: set .@addpart,4740;break;
+ case 33: .@addpart = 4740;break;
case 34:
case 35:
- case 36: set .@addpart,4750;break;
+ case 36: .@addpart = 4750;break;
default:
specialeffect2 EF_PHARMACY_FAIL;
mes "[Apprentice Craftsman]";
diff --git a/npc/merchants/gemstone.txt b/npc/merchants/gemstone.txt
index 126dbeba4..1737c217f 100644
--- a/npc/merchants/gemstone.txt
+++ b/npc/merchants/gemstone.txt
@@ -47,7 +47,7 @@ S_TradeGems:
close;
}
else {
- set .@gems,countitem(getarg(0))/2;
+ .@gems = countitem(getarg(0))/2;
mes "[Jade]";
mes "I believe I can create";
mes "a total of " + .@gems + " " + getitemname(getarg(1)) + "s";
diff --git a/npc/merchants/hair_dyer.txt b/npc/merchants/hair_dyer.txt
index fa4295831..91708d991 100644
--- a/npc/merchants/hair_dyer.txt
+++ b/npc/merchants/hair_dyer.txt
@@ -58,14 +58,14 @@ prt_in,243,168,4 script Jovovich 4_F_02,{
while(1) {
switch(select("Red, please.:Yellow, please.:Violet, please.:Orange, please.:Green, please.:Blue, please.:White, please.:Black, please.:Actually, I like my hair as it is.")) {
- case 1: set .@headpalette,8; break;
- case 2: set .@headpalette,1; break;
- case 3: set .@headpalette,2; break;
- case 4: set .@headpalette,3; break;
- case 5: set .@headpalette,4; break;
- case 6: set .@headpalette,5; break;
- case 7: set .@headpalette,6; break;
- case 8: set .@headpalette,7; break;
+ case 1: .@headpalette = 8; break;
+ case 2: .@headpalette = 1; break;
+ case 3: .@headpalette = 2; break;
+ case 4: .@headpalette = 3; break;
+ case 5: .@headpalette = 4; break;
+ case 6: .@headpalette = 5; break;
+ case 7: .@headpalette = 6; break;
+ case 8: .@headpalette = 7; break;
case 9:
if (.@choose_success != 0) {
mes "[Hairdresser Jovovich]";
@@ -111,7 +111,7 @@ prt_in,243,168,4 script Jovovich 4_F_02,{
}
Zeny -= 1000;
setlook VAR_HEADPALETTE,.@headpalette;
- set .@choose_success,1;
+ .@choose_success = 1;
break;
}
@@ -203,35 +203,35 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "for using my service and";
mes "I hope you come by again!";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
}
while (.@choose_success != 2) {
switch(select("Red, please.:Yellow, please.:Purple, please.:Orange, please.:Green, please.:Blue, please.:White, please.:Dark Brown, please.:I like my hair color.")) {
case 1:
- set .@headpalette,8;
+ .@headpalette = 8;
break;
case 2:
- set .@headpalette,1;
+ .@headpalette = 1;
break;
case 3:
- set .@headpalette,2;
+ .@headpalette = 2;
break;
case 4:
- set .@headpalette,3;
+ .@headpalette = 3;
break;
case 5:
- set .@headpalette,4;
+ .@headpalette = 4;
break;
case 6:
- set .@headpalette,5;
+ .@headpalette = 5;
break;
case 7:
- set .@headpalette,6;
+ .@headpalette = 6;
break;
case 8:
- set .@headpalette,7;
+ .@headpalette = 7;
break;
case 9:
if (.@choose_success != 0) {
@@ -242,7 +242,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "your beauty and to tell";
mes "the truth, I agree with you~";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
}
else {
mes "[Rossa]";
@@ -251,7 +251,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "You'd look so good if you dyed";
mes "your hair a different color~";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
}
break;
}
@@ -272,7 +272,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "hair if you didn't bring";
mes "Scarlet Dyestuffs with you...";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 1) && (countitem(976) == 0)) {
@@ -282,7 +282,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "hair if you didn't bring";
mes "Lemon Dyestuffs with you...";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 2) && (countitem(981) == 0)) {
@@ -292,7 +292,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "hair if you didn't bring";
mes "Violet Dyestuffs with you...";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 3) && (countitem(980) == 0)) {
@@ -302,7 +302,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "hair if you didn't bring";
mes "Orange Dyestuffs with you...";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 4) && (countitem(979) == 0)) {
@@ -314,7 +314,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "with you. Would you come";
mes "back after you get some?";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 5) && (countitem(978) == 0)) {
@@ -326,7 +326,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "with you. Would you come";
mes "back after you get some?";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 6) && (countitem(982) == 0)) {
@@ -336,7 +336,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "hair if you didn't bring";
mes "White Dyestuffs with you...";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
else if ((.@headpalette == 7) && (countitem(983) == 0)) {
@@ -346,7 +346,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "hair if you didn't bring";
mes "Black Dyestuffs with you...";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
if (Zeny < 1000) {
@@ -356,7 +356,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
mes "1,000 zeny. Did you forget";
mes "to bring your money with you?";
close2;
- set .@choose_success,2;
+ .@choose_success = 2;
break;
}
if (.@headpalette == 8) delitem 975,1; //Scarlet_Dyestuffs
@@ -369,7 +369,7 @@ lhz_in02,100,134,3 script Hair Dyer#lich 4_F_EINWOMAN,{
else if (.@headpalette == 7) delitem 983,1; //Black_Dyestuffs
Zeny -= 1000;
setlook VAR_HEADPALETTE,.@headpalette;
- set .@choose_success,1;
+ .@choose_success = 1;
break;
}
}
diff --git a/npc/merchants/hair_style.txt b/npc/merchants/hair_style.txt
index d1ce1e234..2eb2d4eb4 100644
--- a/npc/merchants/hair_style.txt
+++ b/npc/merchants/hair_style.txt
@@ -425,28 +425,28 @@ alberta_in,55,142,7 script Hair Dresser 4_F_02,{
next;
switch(select("Red.:Yellow.:Purple.:Orange.:Green.:Blue.:White.:Dark Brown.:Cancel.")) {
case 1:
- set .@pallete,8;
+ .@pallete = 8;
break;
case 2:
- set .@pallete,1;
+ .@pallete = 1;
break;
case 3:
- set .@pallete,2;
+ .@pallete = 2;
break;
case 4:
- set .@pallete,3;
+ .@pallete = 3;
break;
case 5:
- set .@pallete,4;
+ .@pallete = 4;
break;
case 6:
- set .@pallete,5;
+ .@pallete = 5;
break;
case 7:
- set .@pallete,6;
+ .@pallete = 6;
break;
case 8:
- set .@pallete,7;
+ .@pallete = 7;
break;
case 9:
mes "[Veronica]";
@@ -1006,28 +1006,28 @@ lhz_in02,100,143,3 script Hair Dresser#li 2_M_DYEINGER,{
next;
switch(select("Red:Yellow:Purple:Orange:Green:Blue:White:Dark Brown")) {
case 1:
- set .@headpalette,8;
+ .@headpalette = 8;
break;
case 2:
- set .@headpalette,1;
+ .@headpalette = 1;
break;
case 3:
- set .@headpalette,2;
+ .@headpalette = 2;
break;
case 4:
- set .@headpalette,3;
+ .@headpalette = 3;
break;
case 5:
- set .@headpalette,4;
+ .@headpalette = 4;
break;
case 6:
- set .@headpalette,5;
+ .@headpalette = 5;
break;
case 7:
- set .@headpalette,6;
+ .@headpalette = 6;
break;
case 8:
- set .@headpalette,7;
+ .@headpalette = 7;
break;
}
}
@@ -1244,8 +1244,8 @@ lhz_in02,91,155,5 script Assistant Beautician#li 4_F_LGTGIRL,{
mes "Wait, I can...";
mes "I can fix this!";
next;
- set .@style_r,rand(1,23);
- set .@color_r,rand(1,8);
+ .@style_r = rand(1,23);
+ .@color_r = rand(1,8);
mes "[Assistant Beautician]";
mes "^333333*Pant Pant Pant*^000000";
next;
diff --git a/npc/merchants/hd_refine.txt b/npc/merchants/hd_refine.txt
index 0091b36ef..31e3f5cdf 100644
--- a/npc/merchants/hd_refine.txt
+++ b/npc/merchants/hd_refine.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) {
@@ -85,15 +85,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]";
@@ -170,10 +170,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) {
@@ -229,17 +229,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/merchants/milk_trader.txt b/npc/merchants/milk_trader.txt
index 3f2c46a20..d9c7efe47 100644
--- a/npc/merchants/milk_trader.txt
+++ b/npc/merchants/milk_trader.txt
@@ -46,9 +46,9 @@ prontera,73,140,0 script Milk Vendor 4_M_04,{
mes "way, you know...";
close;
}
- set .@bottles,countitem(713);
- set .@total_weight,.@bottles * 50;
- set .@total_cost,.@bottles * 15;
+ .@bottles = countitem(713);
+ .@total_weight = .@bottles * 50;
+ .@total_cost = .@bottles * 15;
if (Zeny < .@total_cost) {
mes "[Milk Vendor]";
mes "Oh, whoa~!";
diff --git a/npc/merchants/novice_exchange.txt b/npc/merchants/novice_exchange.txt
index 5474190e6..4f9c05218 100644
--- a/npc/merchants/novice_exchange.txt
+++ b/npc/merchants/novice_exchange.txt
@@ -355,7 +355,7 @@ function script F_PotExchange {
break;
}
}
- set .@put_out_item,.@input * getarg(1);
+ .@put_out_item = .@input * getarg(1);
if (countitem(getarg(0)) < .@put_out_item) {
mes "[Merchant]";
mes "Uh oh, the number you entered doesn't seem right. You better check the number of Red Potions that you can trade for again.";
diff --git a/npc/merchants/old_pharmacist.txt b/npc/merchants/old_pharmacist.txt
index d74b3287d..1889ea3b9 100644
--- a/npc/merchants/old_pharmacist.txt
+++ b/npc/merchants/old_pharmacist.txt
@@ -56,13 +56,13 @@ alberta_in,16,28,4 script Pharmacist 1_M_PUBMASTER,{
next;
mes "[Old Pharmacist]";
if (countitem(507) < countitem(713)) {
- set .@max,countitem(507);
+ .@max = countitem(507);
}
else if (countitem(508) < countitem(713)) {
- set .@max,countitem(508);
+ .@max = countitem(508);
}
else {
- set .@max,countitem(713);
+ .@max = countitem(713);
}
if ((countitem(507) < 1) || (countitem(508) < 1) || (countitem(713) == 0)) {
mes "You rascal! What did you expect?! Coming here with nothing. Tsk!";
@@ -186,9 +186,9 @@ L_Making:
next;
mes "[Old Pharmacist]";
if ((countitem(getarg(0))/2) < countitem(713)) {
- set .@max,countitem(getarg(0))/2;
+ .@max = countitem(getarg(0))/2;
} else {
- set .@max,countitem(713);
+ .@max = countitem(713);
}
if ((countitem(getarg(0)) < 2) || (countitem(713) == 0)) {
mes "You rascal! What did you expect?! Coming here with nothing. Tsk!";
diff --git a/npc/merchants/quivers.txt b/npc/merchants/quivers.txt
index 37c183600..a2e293e83 100644
--- a/npc/merchants/quivers.txt
+++ b/npc/merchants/quivers.txt
@@ -76,10 +76,10 @@ S_BuyQuiver:
next;
switch(select("Store as many Arrows in quivers as possible:Purchase 1 quiver:Cancel")) {
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 "Number of";
mes "Arrows: ^3131FF"+.@arrows+" ^000000";
mes "Maximum Number";
diff --git a/npc/merchants/refine.txt b/npc/merchants/refine.txt
index 823fbea66..2b2d95180 100644
--- a/npc/merchants/refine.txt
+++ b/npc/merchants/refine.txt
@@ -144,7 +144,7 @@ geffen_in,110,172,0 script Christopher#1 1_M_SMITH,{
break;
}
}
- set .@sell,.@input * 150;
+ .@sell = .@input * 150;
if (Zeny < .@sell) {
mes "[Christopher Guillenrow]";
mes "I don't think I can let ye have this with the zeny ye have. I can't lose me money because of ye.";
@@ -225,7 +225,7 @@ geffen_in,110,172,0 script Christopher#1 1_M_SMITH,{
break;
}
}
- set .@sell,.@input * 200;
+ .@sell = .@input * 200;
if (Zeny < .@sell) {
mes "[Christopher Guillenrow]";
mes "Ye don't have enough money. Ye know I can't sell this at a lower price... You know how the wifey nags about Zeny.";
@@ -263,7 +263,7 @@ geffen_in,110,172,0 script Christopher#1 1_M_SMITH,{
break;
}
}
- set .@sell,.@input * 1000;
+ .@sell = .@input * 1000;
if (Zeny < .@sell) {
mes "[Christopher Guillenrow]";
mes "I don't think I can let ye have this with the zeny ye have. I can't lose me money because of ye.";
@@ -403,27 +403,27 @@ ein_in01,38,29,0 script Paul Spanner 1_M_SMITH,{
next;
switch(select("Mini Furnace - 150z.:Iron Hammer - 1,000z.:Golden Hammer - 3,000z.:Oridecon Hammer - 5,000z.:Cancel.")) {
case 1:
- set .@item,612;
- set .@item_cost,150;
- set .@item_weight,200;
+ .@item = 612;
+ .@item_cost = 150;
+ .@item_weight = 200;
mes "[Paul Spanner]";
mes "You definately need this furnce to process ores!";
next;
break;
case 2:
- set .@item,613;
- set .@item_cost,1000;
- set .@item_weight,200;
+ .@item = 613;
+ .@item_cost = 1000;
+ .@item_weight = 200;
break;
case 3:
- set .@item,614;
- set .@item_cost,3000;
- set .@item_weight,300;
+ .@item = 614;
+ .@item_cost = 3000;
+ .@item_weight = 300;
break;
case 4:
- set .@item,615;
- set .@item_cost,5000;
- set .@item_weight,400;
+ .@item = 615;
+ .@item_cost = 5000;
+ .@item_weight = 400;
break;
case 5:
mes "[Paul Spanner]";
@@ -449,7 +449,7 @@ ein_in01,38,29,0 script Paul Spanner 1_M_SMITH,{
break;
}
}
- set .@sell,.@input * .@item_cost;
+ .@sell = .@input * .@item_cost;
if (Zeny < .@sell) {
mes "[Paul Spanner]";
mes "You don't have enough money. Sorry, I cannot sell them at a loss.";
@@ -472,12 +472,12 @@ ein_in01,38,29,0 script Paul Spanner 1_M_SMITH,{
next;
switch(select("Phracon - 200z.:Emveretarcon - 1,000z.:Quit.")) {
case 1:
- set .@item,1010;
- set .@item_price,200;
+ .@item = 1010;
+ .@item_price = 200;
break;
case 2:
- set .@item,1011;
- set .@item_price,1000;
+ .@item = 1011;
+ .@item_price = 1000;
break;
case 3:
mes "[Paul Spanner]";
@@ -503,7 +503,7 @@ ein_in01,38,29,0 script Paul Spanner 1_M_SMITH,{
break;
}
}
- set .@sell,.@input * .@item_price;
+ .@sell = .@input * .@item_price;
if (Zeny < .@sell) {
mes "[Paul Spanner]";
mes "You don't have enough money. Sorry, I cannot sell them at a loss.";
@@ -604,7 +604,7 @@ lhz_in02,282,20,7 script Fulerr 4_M_LGTMAN,{
//============================================================
function script refinemain {
disable_items;
- set .@features,getarg(1);
+ .@features = getarg(1);
mes "[" + getarg(0) + "]";
mes "I'm the Armsmith.";
mes "I can refine all kinds of weapons, armor and equipment, so let me";
@@ -612,20 +612,20 @@ function script refinemain {
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) + "]";
@@ -650,38 +650,38 @@ function script refinemain {
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
switch(getequipweaponlv(.@part)){
case 0: //Refine Armor
- set .@price,2000;
- set .@material,985;
- set .@safe,4;
+ .@price = 2000;
+ .@material = 985;
+ .@safe = 4;
break;
case 1: //Refine Level 1 Weapon
- set .@price,50;
- set .@material,1010;
- set .@safe,7;
+ .@price = 50;
+ .@material = 1010;
+ .@safe = 7;
break;
case 2: //Refine Level 2 Weapon
- set .@price,200;
- set .@material,1011;
- set .@safe,6;
+ .@price = 200;
+ .@material = 1011;
+ .@safe = 6;
break;
case 3: //Refine Level 3 Weapon
- set .@price,5000;
- set .@material,984;
- set .@safe,5;
+ .@price = 5000;
+ .@material = 984;
+ .@safe = 5;
break;
case 4: //Refine Level 4 Weapon
- set .@price,20000;
- set .@material,984;
- set .@safe,4;
+ .@price = 20000;
+ .@material = 984;
+ .@safe = 4;
break;
case 5: //Refine other stuff?
- set .@price,2000;
- set .@material,985;
- set .@safe,4;
+ .@price = 2000;
+ .@material = 985;
+ .@safe = 4;
break;
}
if(.@features != 1) {
@@ -757,7 +757,7 @@ function script refinemain {
failedrefitem .@part;
mes "[" + getarg(0) + "]";
emotion (!rand(5))?e_cash:e_omg;
- set .@lose,rand(1,3);
+ .@lose = rand(1,3);
if (.@lose == 1) {
mes "OH! MY GOD!";
mes "Damn it! Not again!";
@@ -778,7 +778,7 @@ function script refinemain {
mes "["+getarg(0)+"]";
successrefitem .@part;
emotion e_heh;
- set .@win,rand(1,3);
+ .@win = rand(1,3);
if (.@win == 1) {
mes "Perfect!";
mes "Heh heh!";
@@ -805,12 +805,12 @@ function script refinemain {
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:
next;
@@ -818,14 +818,14 @@ function script refinemain {
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 > 10) {
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;
@@ -842,7 +842,7 @@ function script refinemain {
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;
@@ -877,17 +877,17 @@ function script refinemain {
emotion e_omg;
mes "[" + getarg(0) + "]";
mes "WAHHHH!!! I'm so sorry... I warned you this could happen...";
- set .@refinecnt,.@refinecnt - 1;
+ --.@refinecnt;
if(.@refinecnt == 0) close;
mes "Here's the unused Zeny and materials back...";
getitem .@material,.@refinecnt;
- set .@fullprice,.@refinecnt * .@price;
+ .@fullprice = .@refinecnt * .@price;
Zeny += .@fullprice;
close;
}
successrefitem .@part;
emotion e_no1;
- set .@refinecnt,.@refinecnt - 1;
+ --.@refinecnt;
next;
}
mes "[" + getarg(0) + "]";
@@ -946,12 +946,12 @@ function script phramain {
next;
switch(select("Phracon - 200 Zeny:Emveretarcon - 1000 Zeny:Ask about other Metals")) {
case 1:
- set .@material,1010;
- set .@price,200;
+ .@material = 1010;
+ .@price = 200;
break;
case 2:
- set .@material,1011;
- set .@price,1000;
+ .@material = 1011;
+ .@price = 1000;
break;
case 3:
mes "[" + getarg(0) + "]";
@@ -984,7 +984,7 @@ function script phramain {
break;
}
}
- set .@sell,.@input * .@price;
+ .@sell = .@input * .@price;
if (Zeny < .@sell) {
mes "[" + getarg(0) + "]";
mes "Err...";
@@ -1183,7 +1183,7 @@ sch_gld,340,80,7 script Repairman#sch_gld 4_M_04,{
// Equipment Repair Function
//============================================================
function script repairmain {
- set .@repairprice,5000;
+ .@repairprice = 5000;
mes "["+getarg(0)+"]";
mes "Hey there!";
mes "Do you want me";
@@ -1193,14 +1193,14 @@ function script repairmain {
next;
switch(select("Actually, I do have some items...:None at the moment.")) {
case 1:
- set .@checkitem,1;
+ .@checkitem = 1;
while (1) {
if (getbrokenid(.@checkitem) == 0) {
break;
}
- set .@checkitem,.@checkitem+1;
+ ++.@checkitem;
}
- set .@checkitem,.@checkitem-1;
+ --.@checkitem;
if (!.@checkitem) {
mes "["+getarg(0)+"]";
mes "Oh wow, this is incredible!";
@@ -1217,7 +1217,7 @@ function script repairmain {
mes "" + .@checkitem + " are damaged.";
mes "Would you like to repair?";
next;
- set .@totalcost,.@repairprice*.@checkitem;
+ .@totalcost = .@repairprice*.@checkitem;
mes "["+getarg(0)+"]";
mes "Each repair costs " + .@repairprice + " Zeny. So to repair all your damaged items would cost " + .@totalcost + " Zeny! Would you like to repair the items?";
next;
@@ -1229,19 +1229,19 @@ function script repairmain {
mes "Check your wallet before you receive the repair bill! I can't repair anything because you don't have enough Zeny.";
close;
}
- set .@checkitem2,1;
+ .@checkitem2 = 1;
while (1) {
if (getbrokenid(.@checkitem2) == 0) {
break;
}
- set .@checkitem2,.@checkitem2+1;
+ ++.@checkitem2;
}
- set .@checkitem2,.@checkitem2-1;
+ --.@checkitem2;
if (.@checkitem == .@checkitem2) {
Zeny -= .@totalcost;
while (.@checkitem) {
repair(.@checkitem);
- set .@checkitem,.@checkitem-1;
+ --.@checkitem;
}
mes "["+getarg(0)+"]";
mes "Okay! All done. Now, try to be a little more careful. Items have lives too you know.";
diff --git a/npc/merchants/renters.txt b/npc/merchants/renters.txt
index 5944932e9..00ff18dd5 100644
--- a/npc/merchants/renters.txt
+++ b/npc/merchants/renters.txt
@@ -26,9 +26,9 @@
// PecoPeco Breeder (for Knights)-------------------------------------------
prontera,55,350,5 script Peco Peco Breeder#knt 8W_SOLDIER,{
- if(Upper==0) set .@price,2500; //Normal Peco - default price
- if(Upper==1) set .@price,2500; //Armored Peco
- if(Upper==2) set .@price,2500; //Baby Peco
+ if(Upper==0) .@price = 2500; //Normal Peco - default price
+ if(Upper==1) .@price = 2500; //Armored Peco
+ if(Upper==2) .@price = 2500; //Baby Peco
mes "[Peco Peco Breeder]";
if (BaseJob == Job_Knight && Class < Job_Rune_Knight) {
@@ -48,7 +48,7 @@ prontera,55,350,5 script Peco Peco Breeder#knt 8W_SOLDIER,{
mes "bankrupt?";
close;
}
- else if(getskilllv("KN_RIDING") == 0) {
+ else if(getskilllv(KN_RIDING) == 0) {
mes "[Peco Peco Breeder]";
mes "I'm sorry, but you're";
mes "not eligible for this";
@@ -56,20 +56,19 @@ prontera,55,350,5 script Peco Peco Breeder#knt 8W_SOLDIER,{
mes "the Peco Peco Ride skill first.";
close;
}
- else if(checkriding()) {
+ else if(checkmount()) {
mes "[Peco Peco Breeder]";
mes "You're already";
mes "mounted on a";
mes "Peco Peco.";
close;
- }
- else if(ismounting()) {
+ } else if(hascashmount()) {
mes "[Peco Peco Breeder]";
mes "Please remove your cash mount.";
close;
}
Zeny -= .@price;
- setriding;
+ setmount(MOUNT_PECO);
close;
case 2:
mes "[Peco Peco Breeder]";
@@ -89,9 +88,9 @@ prontera,55,350,5 script Peco Peco Breeder#knt 8W_SOLDIER,{
// Grand PecoPeco Breeder (for Crusaders)-------------------------------------------
prontera,232,318,3 script Peco Peco Breeder#cru 8W_SOLDIER,{
- if(Upper==0) set .@price,3500; //Normal Peco - default price
- if(Upper==1) set .@price,3500; //Armored Peco
- if(Upper==2) set .@price,3500; //Baby Peco
+ if(Upper==0) .@price = 3500; //Normal Peco - default price
+ if(Upper==1) .@price = 3500; //Armored Peco
+ if(Upper==2) .@price = 3500; //Baby Peco
mes "[PecoPeco Breeder]";
if (BaseJob == Job_Crusader && Class < Job_Rune_Knight) {
@@ -113,26 +112,25 @@ prontera,232,318,3 script Peco Peco Breeder#cru 8W_SOLDIER,{
mes "bring "+.@price+" zeny...";
close;
}
- else if(getskilllv("KN_RIDING") == 0) {
+ else if(getskilllv(KN_RIDING) == 0) {
mes "[Peco Peco Breeder]";
mes "You must first learn";
mes "to ride a PecoPeco before";
mes "I can rent one to you.";
close;
}
- else if(checkriding()) {
+ else if(checkmount()) {
mes "[Peco Peco Breeder]";
mes "You are already";
mes "mounted on a Peco Peco.";
close;
- }
- else if(ismounting()) {
+ } else if(hascashmount()) {
mes "[Peco Peco Breeder]";
mes "Please remove your cash mount.";
close;
}
Zeny -= .@price;
- setriding;
+ setmount(MOUNT_PECO);
close;
case 2:
mes "[PecoPeco Breeder]";
@@ -151,9 +149,9 @@ prontera,232,318,3 script Peco Peco Breeder#cru 8W_SOLDIER,{
// Falcon Master--------------------------------------------------------------
hu_in01,381,304,5 script Falcon Breeder#hnt 8W_SOLDIER,{
- if(Upper==0) set .@price,2500; //Normal Falcon - default price
- if(Upper==1) set .@price,2500; //Scarf Falcon
- if(Upper==2) set .@price,2500; //Baby Falcon
+ if(Upper==0) .@price = 2500; //Normal Falcon - default price
+ if(Upper==1) .@price = 2500; //Scarf Falcon
+ if(Upper==2) .@price = 2500; //Baby Falcon
mes "[Falcon Breeder]";
if (BaseJob == Job_Hunter) {
diff --git a/npc/merchants/socket_enchant.txt b/npc/merchants/socket_enchant.txt
index 4c806a819..178f8ca98 100644
--- a/npc/merchants/socket_enchant.txt
+++ b/npc/merchants/socket_enchant.txt
@@ -281,7 +281,7 @@ function script Func_Socket {
mes "Alright then, let the work begin!";
mes "You'd better pray for a successful result.";
next;
- set .@a, rand(1,100);
+ .@a = rand(1,100);
if ((.@a > getarg(2)) && (.@a < getarg(3)))
{
specialeffect getarg(3) == 51 ? EF_LORD : EF_SANCTUARY; // only S Class items have Lord of Vermillion effect
diff --git a/npc/merchants/socket_enchant2.txt b/npc/merchants/socket_enchant2.txt
index dbdcfe379..08fe62ed9 100644
--- a/npc/merchants/socket_enchant2.txt
+++ b/npc/merchants/socket_enchant2.txt
@@ -277,7 +277,7 @@
mes "Shall we start now?";
mes "Pray to your gods for good luck.";
next;
- set .@a, rand(1,100);
+ .@a = rand(1,100);
if ((.@a > 4) && (.@a < 95))
{
specialeffect EF_LORD;
@@ -417,7 +417,7 @@ function script Func_Socket2 {
mes "Alright then, let the work begin!";
mes "You'd better pray for a successful result.";
next;
- set .@a, rand(1,100);
+ .@a = rand(1,100);
if ((.@a > getarg(2)) && (.@a < getarg(3)))
{
specialeffect EF_LORD;