summaryrefslogtreecommitdiff
path: root/npc/events
diff options
context:
space:
mode:
Diffstat (limited to 'npc/events')
-rw-r--r--npc/events/MemorialDay_2008.txt26
-rw-r--r--npc/events/RWC_2011.txt60
-rw-r--r--npc/events/RWC_2012.txt70
-rw-r--r--npc/events/StPatrick_2008.txt8
-rw-r--r--npc/events/bossnia.txt2
-rw-r--r--npc/events/children_week.txt4
-rw-r--r--npc/events/christmas_2005.txt54
-rw-r--r--npc/events/christmas_2008.txt26
-rw-r--r--npc/events/easter_2008.txt28
-rw-r--r--npc/events/easter_2010.txt56
-rw-r--r--npc/events/event_skill_reset.txt2
-rw-r--r--npc/events/gdevent_aru.txt228
-rw-r--r--npc/events/gdevent_sch.txt232
-rw-r--r--npc/events/god_se_festival.txt12
-rw-r--r--npc/events/halloween_2006.txt20
-rw-r--r--npc/events/halloween_2009.txt86
-rw-r--r--npc/events/lunar_2008.txt16
-rw-r--r--npc/events/nguild/nguild_dunsw.txt2
-rw-r--r--npc/events/nguild/nguild_ev_agit.txt34
-rw-r--r--npc/events/nguild/nguild_flags.txt2
-rw-r--r--npc/events/nguild/nguild_kafras.txt6
-rw-r--r--npc/events/nguild/nguild_managers.txt2
-rw-r--r--npc/events/nguild/nguild_treas.txt18
-rw-r--r--npc/events/valentinesday_2009.txt22
-rw-r--r--npc/events/valentinesday_2012.txt22
-rw-r--r--npc/events/xmas.txt6
26 files changed, 515 insertions, 529 deletions
diff --git a/npc/events/MemorialDay_2008.txt b/npc/events/MemorialDay_2008.txt
index 2c64c5b75..a6c09fe80 100644
--- a/npc/events/MemorialDay_2008.txt
+++ b/npc/events/MemorialDay_2008.txt
@@ -63,7 +63,7 @@ prontera,182,214,4 script Lauds#Memorial 1_M_MERCHANT,{
mes "[Mad Sago Lauds]";
mes "Listen closely.";
mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
- set Memorial08,1;
+ Memorial08 = 1;
close;
}
@@ -91,7 +91,7 @@ prontera,182,214,4 script Lauds#Memorial 1_M_MERCHANT,{
delitem 914,20;
getitem 6025,1;
getnameditem 6025," + strcharinfo(0) + ";
- set Memorial08,2;
+ Memorial08 = 2;
close;
}
}
@@ -114,7 +114,7 @@ prontera,182,214,4 script Lauds#Memorial 1_M_MERCHANT,{
mes "[Mad Sago Lauds]";
mes "It seems you're just carrying it without understanding its meaning.";
mes "What a shame! You should go speak to ^FF0000Grast in Prontera^000000.";
- set Memorial08,3;
+ Memorial08 = 3;
close;
}
@@ -149,7 +149,7 @@ prontera,182,214,4 script Lauds#Memorial 1_M_MERCHANT,{
mes "What? Why are you giving me your garbage!";
mes "Those items are not useful to me at all.";
mes "You should be going to the plaque!";
- set Memorial08,8;
+ Memorial08 = 8;
close;
}
@@ -161,7 +161,7 @@ prontera,182,214,4 script Lauds#Memorial 1_M_MERCHANT,{
}
else if (Memorial08 >= 9) {
- set .@RandomMsg, rand(1,5);
+ .@RandomMsg = rand(1,5);
if (.@RandomMsg == 1) {
mes "[Mad Sago Lauds]";
mes "Don't panic!";
@@ -207,7 +207,7 @@ prontera,153,286,4 script Memorial Plaque#Memorial 4_BOARD3,{
mes "'This must be what Lauds was talking about.'";
mes "'Let's dust it off with the towel.'";
next;
- set Memorial08,9;
+ Memorial08 = 9;
getexp 93750,43750;
goto L_CleanPlaque;
}
@@ -244,7 +244,7 @@ prontera,153,286,4 script Memorial Plaque#Memorial 4_BOARD3,{
mes "- Arthur Ashe -";
if (Memorial08 == 9) {
getexp 93750,43750;
- set Memorial08,10;
+ Memorial08 = 10;
}
close;
}
@@ -273,7 +273,7 @@ prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
mes "[Grast]";
mes "Please bring me ^FF0000one of each Red Potion, Green Potion, Awakening Potion, and Butterfly Wing^000000.";
mes "I'll be waiting for your return.";
- set Memorial08,4;
+ Memorial08 = 4;
close;
}
@@ -303,7 +303,7 @@ prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
mes "[Grast]";
mes "Please bring me ^FF0000one of each Trap, Yggdrasil Leaf, Blue Gemstone, Crystal Mirror, Meat, and Carrot.^000000";
mes "I'll be waiting for your return.";
- set Memorial08,5;
+ Memorial08 = 5;
close;
}
}
@@ -330,7 +330,7 @@ prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
next;
mes "[Grast]";
mes "Please bring me ^FF0000one of each Pet Incubator, Firecracker, Poring Doll, and Bouquet^000000.";
- set Memorial08,6;
+ Memorial08 = 6;
close;
}
}
@@ -376,7 +376,7 @@ prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
mes "You've selected my right hand.";
mes "Here's the gift for you.";
mes "Now, please bring all these materials to Lauds.";
- set Memorial08, 7;
+ Memorial08 = 7;
getitem 617,1;
close;
}
@@ -384,7 +384,7 @@ prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
mes "You've selected my left hand.";
mes "Here's the gift for you.";
mes "Now, please bring all these materials to Lauds.";
- set Memorial08, 7;
+ Memorial08 = 7;
getitem 12109,1;
close;
}
@@ -413,7 +413,7 @@ prontera,150,270,4 script Grast#Memorial 4_M_HUMERCHANT,{
mes "I crushed all the items together into a more compact form for you.";
mes "You can thank me later for that extra service.";
mes "Please bring them to Lauds.";
- set Memorial08,7;
+ Memorial08 = 7;
getitem 7126,1;
next;
mes "[Grast]";
diff --git a/npc/events/RWC_2011.txt b/npc/events/RWC_2011.txt
index 4f0a05b86..f7534af84 100644
--- a/npc/events/RWC_2011.txt
+++ b/npc/events/RWC_2011.txt
@@ -26,7 +26,7 @@ prontera,114,81,5 script RWC2011 Agent#2 4_M_ATEIL,{
mes "[New Agent]";
mes "It's RWC time!";
next;
- set .@loop,1;
+ .@loop = 1;
while(.@loop) {
switch(select("What is RWC?:Are you a New Agent?:I don't care.")) {
case 1:
@@ -73,7 +73,7 @@ prontera,114,81,5 script RWC2011 Agent#2 4_M_ATEIL,{
mes "- His brimming small eyes seem to tell you something. ^FF0000Please talk to me again...^000000 -";
close;
}
- set .@loop,0;
+ .@loop = 0;
break;
case 3:
mes "[New Agent]";
@@ -148,7 +148,7 @@ prontera,114,81,5 script RWC2011 Agent#2 4_M_ATEIL,{
next;
mes "[New Agent]";
mes "Please help me out!! My life is in your hands!";
- set oversea_event,1;
+ oversea_event = 1;
setquest 13000;
close;
} else if (oversea_event == 1) {
@@ -169,35 +169,35 @@ prontera,114,81,5 script RWC2011 Agent#2 4_M_ATEIL,{
delitem 7470,1; //BlueCard_W
delitem 6012,1; //Blue_Card_C
//SavePPL BlueCard_2
- set oversea_event,2;
+ oversea_event = 2;
erasequest 13000;
setquest 13001;
- set .@i, rand(1,100);
- if (.@i == 1) getitem 12690,1; //Old_C_Album_Helm
- else if (.@i == 2) getitem 12691,1; //Old_C_Album_Armor
- else if (.@i == 3) getitem 12693,1; //Old_C_Album_Garment
- else if (.@i == 4) getitem 12694,1; //Old_C_Album_Shoes
- else if (.@i == 5) getitem 12698,1; //Old_C_Album_Weapon
- else if (.@i == 6) getitem 12695,1; //Old_C_Album_Acc
- else if (.@i == 7) getitem 12692,1; //Old_C_Album_Shield
- else if (.@i < 28) getitem 547,10; //White_Slim_Potion
- else if (.@i < 38) getitem 607,1; //Yggdrasilberry
- else if (.@i < 51) getitem 608,1; //Seed_Of_Yggdrasil
- else {
+ .@i = rand(1,100);
+ if (.@i == 1) getitem 12690,1; //Old_C_Album_Helm
+ else if (.@i == 2) getitem 12691,1; //Old_C_Album_Armor
+ else if (.@i == 3) getitem 12693,1; //Old_C_Album_Garment
+ else if (.@i == 4) getitem 12694,1; //Old_C_Album_Shoes
+ else if (.@i == 5) getitem 12698,1; //Old_C_Album_Weapon
+ else if (.@i == 6) getitem 12695,1; //Old_C_Album_Acc
+ else if (.@i == 7) getitem 12692,1; //Old_C_Album_Shield
+ else if (.@i < 28) getitem 547,10; //White_Slim_Potion
+ else if (.@i < 38) getitem 607,1; //Yggdrasilberry
+ else if (.@i < 51) getitem 608,1; //Seed_Of_Yggdrasil
+ else {
getitem 12696,5; //RWC_Cele_Fire
getitem 12697,5; //RWC_Cele_Fire2
- }
- mes "[RWC2011 Agent]";
- mes "It's not much but please keep it! Haha, we still have lots of cards to be found. I hope you can help me tomorrow as well.";
- next;
- mes "[RWC2011 Agent]";
- mes "Thank you!! I can continue working now. Nothing is impossible when we have great adventurers like you in this world!";
- next;
- mes "[RWC2011 Agent]";
- mes "ADIOS!";
- next;
- mes "- Agent muttered something to himself. -";
- close;
+ }
+ mes "[RWC2011 Agent]";
+ mes "It's not much but please keep it! Haha, we still have lots of cards to be found. I hope you can help me tomorrow as well.";
+ next;
+ mes "[RWC2011 Agent]";
+ mes "Thank you!! I can continue working now. Nothing is impossible when we have great adventurers like you in this world!";
+ next;
+ mes "[RWC2011 Agent]";
+ mes "ADIOS!";
+ next;
+ mes "- Agent muttered something to himself. -";
+ close;
} else {
mes "[RWC2011 Agent]";
mes "Mmmm~ not yet? We're short-handed... Please help me.";
@@ -218,7 +218,7 @@ prontera,114,81,5 script RWC2011 Agent#2 4_M_ATEIL,{
mes "[RWC2011 Agent]";
mes "Thanks for the last time.";
mes "I must keep on promoting the event so I want to ask you again~!";
- set oversea_event,3;
+ oversea_event = 3;
close;
} else if (oversea_event == 3) {
mes "[RWC2011 Agent]";
@@ -231,7 +231,7 @@ prontera,114,81,5 script RWC2011 Agent#2 4_M_ATEIL,{
mes "It's the same mission as before.";
mes "Try to gather blue cards and make the word, ^FF0000R W C 2 0 1 1 ^000000.";
mes "Good Luck!";
- set oversea_event,1;
+ oversea_event = 1;
setquest 13000;
close;
case 2:
diff --git a/npc/events/RWC_2012.txt b/npc/events/RWC_2012.txt
index 33e3cec84..43b884a0d 100644
--- a/npc/events/RWC_2012.txt
+++ b/npc/events/RWC_2012.txt
@@ -21,7 +21,7 @@ prontera,147,61,3 script Driller#pron 4_M_BARBER,{
mes "You cannot proceed because you're overweight.";
close;
}
- set .@part, EQI_ACC_L;
+ .@part = EQI_ACC_L;
if (!getequipisequiped(.@part)) {
mes "[Driller]";
mes "My job is to drill a card slot into RWC Memorial accessories.";
@@ -33,7 +33,7 @@ prontera,147,61,3 script Driller#pron 4_M_BARBER,{
mes "[Driller]";
mes "My job is to drill a card slot into RWC Memorial accessories. Moreover, I only treat ^ff0000pure items^000000, or those which have not been enchanted.";
next;
- set .@equip_id, getequipid(.@part);
+ .@equip_id = getequipid(.@part);
if (.@equip_id != 2966 && .@equip_id != 2968) {
mes "[Driller]";
mes "However, I can see that the accessory you are wearing on the right side cannot be treated. Please equip a RWC Memorial accessory.";
@@ -48,13 +48,13 @@ prontera,147,61,3 script Driller#pron 4_M_BARBER,{
close;
}
if (.@equip_id == 2966) {
- set .@slotted, 2967; //RWC_2012_Ring_
- set .@name$,"RWC 2012 Memorial Ring";
- set .@str$,"ring";
+ .@slotted = 2967; //RWC_2012_Ring_
+ .@name$ = "RWC 2012 Memorial Ring";
+ .@str$ = "ring";
} else if (.@equip_id == 2968) {
- set .@slotted, 2969; //RWC_2012_Pendant_
- set .@name$,"RWC 2012 Memorial Pendant";
- set .@str$,"pendant";
+ .@slotted = 2969; //RWC_2012_Pendant_
+ .@name$ = "RWC 2012 Memorial Pendant";
+ .@str$ = "pendant";
} else {
mes "[Driller]";
mes "I can't identify the accessory item you're wearing on your right hand. I can't work on it.";
@@ -93,25 +93,25 @@ prontera,147,59,3 script Goldberg#pron 4_M_OILMAN,{
mes "[Goldberg]";
mes "Hello! I am in charge of enchanting RWC Memorial accessories with some mystic powers.";
next;
- set .@part, EQI_ACC_L;
+ .@part = EQI_ACC_L;
if (!getequipisequiped(.@part)) {
mes "[Goldberg]";
mes "I'm sorry but you don't have any item equipped on your right accessory position.";
close;
}
- set .@equip_id, getequipid(.@part);
+ .@equip_id = getequipid(.@part);
if (.@equip_id < 2966 || .@equip_id > 2969) {
mes "[Goldberg]";
mes "However, I can see that the accessory you are wearing is not something I can work on. Please equip a RWC Memorial accessory.";
close;
}
- set .@select, select("Sorry, not interested.:Please, empower my accessory.:Remove the Enchant.")-1;
+ .@select = select("Sorry, not interested.:Please, empower my accessory.:Remove the Enchant.")-1;
if (.@select == 0) {
mes "[Goldberg]";
mes "Alright, then, see you next time...";
close;
}
- set .@equip_refine, getequiprefinerycnt(.@part);
+ .@equip_refine = getequiprefinerycnt(.@part);
setarray .@equip_card[0], getequipcardid(.@part,0),getequipcardid(.@part,1),getequipcardid(.@part,2),getequipcardid(.@part,3);
if (.@select == 1) {
switch(getequipid(.@part)) {
@@ -133,10 +133,10 @@ prontera,147,59,3 script Goldberg#pron 4_M_OILMAN,{
mes "If you have equipped your RWC Memorial accessory on the left side, try to swap it to the right side.";
close;
}
- for(set .@i,3; .@i>=0; set .@i,.@i-1) {
+ for(.@i = 3; .@i >= 0; --.@i) {
if (.@equip_card[.@i] == 0) {
- set .@slot, .@i;
- set .@op_type, .@option[.@i];
+ .@slot = .@i;
+ .@op_type = .@option[.@i];
break;
}
}
@@ -146,25 +146,25 @@ prontera,147,59,3 script Goldberg#pron 4_M_OILMAN,{
mes "Which enchantment would you like to infuse?";
next;
setarray .@enchant_select[0],1,2,3,4;
- set .@i, select("Cancel:Fighting Spirit:ATK (%):Max HP:HP")-2;
+ .@i = select("Cancel:Fighting Spirit:ATK (%):Max HP:HP")-2;
break;
case 3:
setarray .@enchant_select[0],5,6,7;
- set .@i, select("Cancel:Spell:MATK (%):SP")-2;
+ .@i = select("Cancel:Spell:MATK (%):SP")-2;
break;
case 2:
mes "[Goldberg]";
mes "^ff0000Be careful! There is about a 25% chance that the enchantment will fail. If this happens, the item will be destroyed.^000000 Which enchantment would you like to infuse?";
next;
setarray .@enchant_select[0],8,9,10,11,12,13,14;
- set .@i, select("Cancel:STR:AGI:VIT:INT:DEX:LUK:SP")-2;
+ .@i = select("Cancel:STR:AGI:VIT:INT:DEX:LUK:SP")-2;
break;
case 1:
mes "[Goldberg]";
mes "^ff0000There is about a 25% chance that the enchantment will fail. If this happens, the item will be destroyed.^000000 Which enchantment would you like to infuse?";
next;
setarray .@enchant_select[0],8,9,10,11,12,13,15,16;
- set .@i, select("Cancel:STR:AGI:VIT:INT:DEX:LUK:MHP:HP")-2;
+ .@i = select("Cancel:STR:AGI:VIT:INT:DEX:LUK:MHP:HP")-2;
break;
case 0:
mes "[Goldberg]";
@@ -184,7 +184,7 @@ prontera,147,59,3 script Goldberg#pron 4_M_OILMAN,{
mes "Alright, then, see you next time...";
close;
}
- set .@enchant_type, .@enchant_select[.@i];
+ .@enchant_type = .@enchant_select[.@i];
if (!getequipisequiped(.@part)) {
mes "[Goldberg]";
mes "Do not take off your equipment while I'm working, okay?";
@@ -246,25 +246,25 @@ prontera,147,59,3 script Goldberg#pron 4_M_OILMAN,{
}
if (.@enchant_type < 8)
- set .@i, rand(1,300); // 0% break chance.
+ .@i = rand(1,300); // 0% break chance.
else
- set .@i, rand(1,400); // 25% break chance.
+ .@i = rand(1,400); // 25% break chance.
- if (.@i < 151) set .@enchant, .@enc[0];
- else if (.@i < 251) set .@enchant, .@enc[1];
- else if (.@i < 301) set .@enchant, .@enc[2];
- else set .@enchant,9;
+ if (.@i < 151) .@enchant = .@enc[0];
+ else if (.@i < 251) .@enchant = .@enc[1];
+ else if (.@i < 301) .@enchant = .@enc[2];
+ else .@enchant = 9;
- set .@equip_card[.@slot], .@enchant;
+ .@equip_card[.@slot] = .@enchant;
if (.@slot == 2 && .@enchant == 0) {
- set .@equip_card[3],0;
+ .@equip_card[3] = 0;
} else if (.@slot == 1 && .@enchant == 0) {
- set .@equip_card[2],0;
- set .@equip_card[3],0;
+ .@equip_card[2] = 0;
+ .@equip_card[3] = 0;
} else if (.@slot == 0 && .@enchant == 0) {
- set .@equip_card[1],0;
- set .@equip_card[2],0;
- set .@equip_card[3],0;
+ .@equip_card[1] = 0;
+ .@equip_card[2] = 0;
+ .@equip_card[3] = 0;
}
delequip .@part;
@@ -315,9 +315,9 @@ prontera,147,59,3 script Goldberg#pron 4_M_OILMAN,{
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];
diff --git a/npc/events/StPatrick_2008.txt b/npc/events/StPatrick_2008.txt
index c1816374f..a0b5fda61 100644
--- a/npc/events/StPatrick_2008.txt
+++ b/npc/events/StPatrick_2008.txt
@@ -99,7 +99,7 @@ prt_fild05,170,286,4 script Anxious Leprechaun#8pday 4_M_PATRICK,{
mes "[O'Riley the Leprechaun]";
mes "Ye might try some Firecrackers.";
mes "Course, Ye would need a great number of them, Ye would need at least ^FF0000200 Firecreackers^000000";
- set StPatrick2008,1;
+ StPatrick2008 = 1;
close;
}
else if (StPatrick2008 == 1) {
@@ -136,7 +136,7 @@ prt_fild05,170,286,4 script Anxious Leprechaun#8pday 4_M_PATRICK,{
mes "[O'Riley the Leprechaun]";
mes "When ye have had a moment to rest ye legs, come talk to me again and we may speak again";
close2;
- set StPatrick2008,3;
+ StPatrick2008 = 3;
getexp 200000,70000;
delitem 7721,1;
end;
@@ -153,7 +153,7 @@ prt_fild05,170,286,4 script Anxious Leprechaun#8pday 4_M_PATRICK,{
mes "I would be so generous to give you some of my famous brew if you would bring me the ill-gotten gains carried by those vile snakes";
next;
mes "And if you find one of the treasures of my kin please bring me those coins so that the snakes don't get them.";
- set StPatrick2008,4;
+ StPatrick2008 = 4;
close;
}
else if (StPatrick2008 == 4) {
@@ -229,7 +229,7 @@ OnTouch:
mes "This box must contain O'Riley's valuables.";
mes "Let's bring the box to O'Riley.";
close2;
- set StPatrick2008,2;
+ StPatrick2008 = 2;
delitem 12018,200;
getitem 7721,1;
}
diff --git a/npc/events/bossnia.txt b/npc/events/bossnia.txt
index 8bb48661c..432c8e391 100644
--- a/npc/events/bossnia.txt
+++ b/npc/events/bossnia.txt
@@ -67,7 +67,7 @@ prontera,132,125,4 script Bossnia Staff#1 4_M_PHILMAN,{
mes "Would you really like to take the challenge?";
mes "Ok, just choose the course.";
next;
- set .@i, select("First","Second","Third","Fourth");
+ .@i = select("First","Second","Third","Fourth");
mes "[Riss]";
mes "Take care, boy~";
mes "Don't hold a grudge against me.";
diff --git a/npc/events/children_week.txt b/npc/events/children_week.txt
index 48e9231d6..3ba99ebd2 100644
--- a/npc/events/children_week.txt
+++ b/npc/events/children_week.txt
@@ -40,7 +40,7 @@ prontera,146,91,5 script Pandit chacha#child07 1_M_PUBMASTER,{
mes "Whenever come back again if you want it...";
close;
}
- set oversea_event9,1;
+ oversea_event9 = 1;
getitem 11705,10; //Special_White_Potion
mes "[Pandit chacha]";
mes "Look. This is a child Potion.";
@@ -68,7 +68,7 @@ prontera,146,91,5 script Pandit chacha#child07 1_M_PUBMASTER,{
close2;
delitem 745,1; //Wedding_Bouquet
delitem 748,1; //Witherless_Rose
- set oversea_event9,2;
+ oversea_event9 = 2;
getitem 11705,50; //Special_White_Potion
end;
}
diff --git a/npc/events/christmas_2005.txt b/npc/events/christmas_2005.txt
index eb80e6be1..c782e3b9d 100644
--- a/npc/events/christmas_2005.txt
+++ b/npc/events/christmas_2005.txt
@@ -261,7 +261,7 @@ prontera,155,285,3 script Enjoy#enjoy 4_M_MONK,{
next;
mes "["+ strcharinfo(0) +"]";
mes "Let's punish!!!!!!!!!!!!!!!!!!!!!!!!!!!";
- set christ_solo05,1;
+ christ_solo05 = 1;
close;
case 2:
mes "[Enjoy]";
@@ -287,8 +287,8 @@ prontera,155,285,3 script Enjoy#enjoy 4_M_MONK,{
mes "Get lost,you devil!!!!!!";
specialeffect EF_BEGINASURA;
specialeffect2 EF_HIT2;
- set Hp,Hp/2;
- set Hp,Hp/2;
+ Hp /= 2;
+ Hp /= 2;
close2;
warp "prontera",155,230;
end;
@@ -397,7 +397,7 @@ prontera,155,285,3 script Enjoy#enjoy 4_M_MONK,{
donpcevent "Event#event02::OnCommandEmotion";
misceffect EF_HITLINE2;
delitem 604,5; //Branch_of_Dead_Tree
- set christ_solo05,6;
+ christ_solo05 = 6;
donpcevent "Happymerry#happymerry02::OnCommandOff";
donpcevent "Christ#christ02::OnCommandOff";
donpcevent "Mas#mas02::OnCommandOff";
@@ -458,7 +458,7 @@ prontera,155,285,3 script Enjoy#enjoy 4_M_MONK,{
mes "Cheer up everybody!!!";
mes "Let's rock till you get happy~!";
mes "";
- set christ_solo05,0;
+ christ_solo05 = 0;
close;
}
@@ -636,7 +636,7 @@ prontera,188,177,4 script Happymerry#happymerry 4_M_LGTMAN,{
mes "Call him for me!";
mes "I'll go ahead with my bags packed up.";
mes "See ya!";
- set christ_solo05,2;
+ christ_solo05 = 2;
close;
}
else if (christ_solo05 > 1) {
@@ -716,7 +716,7 @@ prontera,62,339,3 script Christ#christ 4_M_PECOKNIGHT,{
mes "Go tell ^0000FFMas^000000";
mes "about this!!!";
mes "See ya~~!";
- set christ_solo05,3;
+ christ_solo05 = 3;
close;
}
else if (christ_solo05 > 2) {
@@ -807,7 +807,7 @@ prontera,163,66,7 script Mas#mas 4_M_ALCHE_A,{
mes "Well,bye~.";
mes "I'll meet you there!!...";
mes "Herbs~?! Couples?! Whatever~~";
- set christ_solo05,4;
+ christ_solo05 = 4;
close;
}
else if (christ_solo05 > 3) {
@@ -888,7 +888,7 @@ prontera,35,209,5 script Event#event 4_M_SITDOWN,{
mes "Now I should get my ^0000FFBranch of Dead Tree^000000s packed up";
mes "and go punish singles!!!";
mes "Hahahaha..";
- set christ_solo05,5;
+ christ_solo05 = 5;
close;
}
else if (christ_solo05 > 4) {
@@ -1052,7 +1052,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Well then, hope you a good luck!!!";
mes " ";
emotion e_no1;
- set christ_carol05,1;
+ christ_carol05 = 1;
close;
case 4:
mes "[Oholy]";
@@ -1186,7 +1186,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 12130,7;//Cookie_Bag
close;
case 2:
@@ -1198,7 +1198,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 529,20;//Candy
close;
case 3:
@@ -1210,7 +1210,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 530,15;//Candy_Striper
close;
case 4:
@@ -1222,7 +1222,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 539,5;//Piece_of_Cake
close;
case 5:
@@ -1234,7 +1234,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 538,10;//Well_baked_Cookie
close;
case 6:
@@ -1246,7 +1246,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 743,1;//Spore_Doll
close;
case 7:
@@ -1258,7 +1258,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 750,1;//Baphomet_Doll
close;
case 8:
@@ -1270,7 +1270,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 751,1;//Osiris_Doll
close;
case 9:
@@ -1282,7 +1282,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 752,1;//Grasshopper_Doll
close;
@@ -1295,7 +1295,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 753,1;//Monkey_Doll
close;
case 11:
@@ -1307,7 +1307,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 754,1;//Raccoondog_Doll
close;
case 12:
@@ -1320,7 +1320,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 7206,1;//Black_Kitty_Doll
close;
case 13:
@@ -1331,7 +1331,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 7212,1;//Hanging_Doll
close;
case 14:
@@ -1344,7 +1344,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 7277,1;//Munak_Doll
close;
case 15:
@@ -1356,7 +1356,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "Merry Christmas!";
emotion e_heh;
delitem 1097,1;//Worn_Out_Page
- set christ_carol05,3;
+ christ_carol05 = 3;
getitem 2236,1;//Santa's_Hat
close;
}
@@ -1381,7 +1381,7 @@ prontera,156,242,0 script Oholy#pron::OholyDup 1_F_PRIEST,{
mes "[Oholy]";
mes "Let's think about the neighbors";
mes "and do a good deed during Christmas!";
- set christ_carol05,0;
+ christ_carol05 = 0;
close;
}
}
@@ -1423,7 +1423,7 @@ function script F_carol_devi {
mes "Sledge... Reindeer...";
mes "Hmm, I think I got what I need.";
mes "Let's go back to Ms.Oholy.";
- set christ_carol05,2;
+ christ_carol05 = 2;
getitem 1097,1; //Worn_Out_Page
close;
case 2:
diff --git a/npc/events/christmas_2008.txt b/npc/events/christmas_2008.txt
index 192bf25ec..2b6d67eca 100644
--- a/npc/events/christmas_2008.txt
+++ b/npc/events/christmas_2008.txt
@@ -236,7 +236,7 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
mes "[Caroller]";
mes "They're definitely as harsh as their name.";
mes "Go on please!";
- set iROxmas08carol,1;
+ iROxmas08carol = 1;
close;
case 4:
@@ -338,7 +338,7 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
next;
delitem 6092,6;
emotion e_ok;
- set iROxmas08carol,2;
+ iROxmas08carol = 2;
mes "[Caroller]";
mes "Those are all needed.";
mes "Isn't that easy?";
@@ -424,7 +424,7 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
delitem 7312,1;
delitem 938,10;
delitem 732,1;
- set iROxmas08carol,3;
+ iROxmas08carol = 3;
mes "[Caroller]";
mes "Thanks a lot.";
mes "Merry Christmas!";
@@ -510,8 +510,8 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
mes "Please visit me after the one hour has passed.";
close;
}
- set .@SantaCardTurn,0;
- set .@SantaCardWins,0;
+ .@SantaCardTurn = 0;
+ .@SantaCardWins = 0;
mes "[Santa Claus]";
mes "Wow! You're so cool!";
next;
@@ -557,27 +557,27 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
case 1:
mes "["+strcharinfo(0)+"]";
mes "Um...I choose Poring!";
- set .@SantaCardP,1;
+ .@SantaCardP = 1;
next;
break;
case 2:
mes "["+strcharinfo(0)+"]";
mes "Um...I choose Angeling!";
- set .@SantaCardP,2;
+ .@SantaCardP = 2;
next;
break;
case 3:
mes "["+strcharinfo(0)+"]";
mes "Um...I choose Ghostring!";
- set .@SantaCardP,3;
+ .@SantaCardP = 3;
next;
}
mes "[Santa Claus]";
mes "Let's see!!";
mes "One! Two! Three!";
- set .@SantaCardNpc, rand(1,3);
+ .@SantaCardNpc = rand(1,3);
next;
mes "[Santa Claus]";
mes "Let's see!!";
@@ -592,9 +592,9 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
cutin "°í½ºÆ®¸µÄ«µå",4; // Ghostring Card
}
next;
- set .@SantaCardTurn,.@SantaCardTurn+1;
+ ++.@SantaCardTurn;
if (.@SantaCardP == .@SantaCardNpc) {
- set .@SantaCardWins,.@SantaCardWins+1;
+ ++.@SantaCardWins;
emotion e_gasp;
emotion e_ic,1;
cutin "",255;
@@ -626,7 +626,7 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
mes "[Santa Claus]";
mes "Now this gift is for you.";
mes "Put your hand into the bag and pick only one.";
- set .@SantaCardPrize, rand(1,12);
+ .@SantaCardPrize = rand(1,12);
next;
if (.@SantaCardPrize == 1) {
getitem 12354,2;
@@ -664,7 +664,7 @@ prontera,226,306,4 script Caroller#iROxmas08 1_F_PRIEST,{
else if (.@SantaCardPrize == 12) {
getitem 594,3;
}
- set SantaCardTime,gettimetick(2)+3600;
+ SantaCardTime = gettimetick(2)+3600;
mes "[Santa Claus]";
mes "Good job! Thanks for playing the card game with me!";
mes "Merry Christmas!";
diff --git a/npc/events/easter_2008.txt b/npc/events/easter_2008.txt
index 79dfc4cce..5b53831a4 100644
--- a/npc/events/easter_2008.txt
+++ b/npc/events/easter_2008.txt
@@ -90,7 +90,7 @@ prontera,111,99,5 script Egg Salesman#prt::EggVendor 4W_M_02,{
next;
}
else {
- set .@egg_zeny,.@input*500;
+ .@egg_zeny = .@input*500;
if (Zeny < .@egg_zeny) {
mes "[Egg Salesman]";
mes "You don't have enough Zeny.";
@@ -173,7 +173,7 @@ prontera,108,96,5 script Cantankerous Geezer#prt::EggGeezer 4_M_SEAMAN,{
mes "giving to them in return?";
close2;
if (easter2008 < 1) {
- set easter2008,1;
+ easter2008 = 1;
}
end;
}
@@ -341,7 +341,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "more, then why don't you";
mes "bring me 10 Holy Eggs?";
mes "That is my condition.";
- set easter2008,2;
+ easter2008 = 2;
close;
case 2:
mes "[Corps Member]";
@@ -388,7 +388,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "for joining us. Now, I can";
mes "tell you about what we do.";
delitem 12019,10; //Holy_Egg
- set easter2008,3;
+ easter2008 = 3;
getitem 644,2; //Gift_Box
next;
mes "[Corps Member]";
@@ -441,7 +441,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "Go and bring me";
mes "33 Holy Eggs! I shall be";
mes "waiting here for your return...";
- set easter2008,4;
+ easter2008 = 4;
close;
}
else if (easter2008 == 4) {
@@ -468,7 +468,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "Sacrifice the Holy Eggs there,";
mes "and then return to me. Now...";
mes "Go, and bring him back to life!";
- set easter2008,5;
+ easter2008 = 5;
close;
}
else if ((BaseLevel > 40) && (BaseLevel < 61)) {
@@ -479,7 +479,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "at the entrance to the 4th";
mes "level. Sacrifice the Holy Eggs";
mes "there, and return him to life!";
- set easter2008,6;
+ easter2008 = 6;
close;
}
else if ((BaseLevel > 60) && (BaseLevel < 81)) {
@@ -490,7 +490,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "Sacrifice the Holy Eggs as soon";
mes "as you get to the 3rd floor.";
mes "Go, and bring him back to life!";
- set easter2008,7;
+ easter2008 = 7;
close;
}
else {
@@ -501,7 +501,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "2nd floor. A hero perished";
mes "there, but you shall bring";
mes "him back to the living!";
- set easter2008,8;
+ easter2008 = 8;
close;
}
}
@@ -593,7 +593,7 @@ morocc,131,26,5 script Secret Corps#egg 4_M_MASKMAN,{
mes "and then try again next year.";
mes "Farewell, my friend, and I hope";
mes "that you'll assist us again.";
- set easter2008,10;
+ easter2008 = 10;
if (BaseLevel < 41) {
getexp 5000,0;
getexp 5000,0;
@@ -658,7 +658,7 @@ pay_dun00,22,127,0 script Trace#egg1 CLEAR_NPC,{
mes "him know that it didn't work.";
close2;
delitem 12019,33; //Holy_Egg
- set easter2008,9;
+ easter2008 = 9;
end;
}
else {
@@ -710,7 +710,7 @@ iz_dun02,340,346,0 script Trace#egg CLEAR_NPC,{
mes "him know that it didn't work.";
close2;
delitem 12019,33; //Holy_Egg
- set easter2008,9;
+ easter2008 = 9;
end;
}
else {
@@ -762,7 +762,7 @@ mjo_dun03,308,256,0 script Trace#egg2 CLEAR_NPC,{
mes "him know that it didn't work.";
close2;
delitem 12019,33; //Holy_Egg
- set easter2008,9;
+ easter2008 = 9;
end;
}
else {
@@ -814,7 +814,7 @@ gl_prison,157,176,0 script Trace#egg3 CLEAR_NPC,{
mes "him know that it didn't work.";
close2;
delitem 12019,33; //Holy_Egg
- set easter2008,9;
+ easter2008 = 9;
end;
}
else {
diff --git a/npc/events/easter_2010.txt b/npc/events/easter_2010.txt
index 8276e0774..70ebbe4fa 100644
--- a/npc/events/easter_2010.txt
+++ b/npc/events/easter_2010.txt
@@ -184,10 +184,10 @@ prontera,202,297,3 script Rina#Easter 4_F_JOB_HUNTER,{
else if (oversea_event9 == 197) playbgm "94.mp3"; // Theme of Rachel
else {
switch(rand(1,4)) {
- case 1: playbgm "13.mp3"; set oversea_event2,520; break;
- case 2: playbgm "59.mp3"; set oversea_event3,270; break;
- case 3: playbgm "70.mp3"; set oversea_event6,245; break;
- case 4: playbgm "94.mp3"; set oversea_event9,197; break;
+ case 1: playbgm "13.mp3"; oversea_event2 = 520; break;
+ case 2: playbgm "59.mp3"; oversea_event3 = 270; break;
+ case 3: playbgm "70.mp3"; oversea_event6 = 245; break;
+ case 4: playbgm "94.mp3"; oversea_event9 = 197; break;
}
}
}
@@ -234,28 +234,28 @@ prontera,202,297,3 script Rina#Easter 4_F_JOB_HUNTER,{
getitem 5852,1; //Easter_Egg_Shell
.@BaseExp = (BaseLevel * (BaseLevel / 4)) * ((BaseLevel / 29) + (BaseLevel / 6)) + (5 * BaseLevel / 2);
if (ADVJOB == 0) {
- if (BaseLevel < 40) set .@nBaseExp, .@BaseExp;
- else if (BaseLevel < 50) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel);
- else if (BaseLevel < 60) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 20));
- else if (BaseLevel < 70) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 10));
- else if (BaseLevel < 80) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 5));
- else if (BaseLevel < 90) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 3));
- else if (BaseLevel < 99) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 2));
- else set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 2) * 2);
+ if (BaseLevel < 40) .@nBaseExp = .@BaseExp;
+ else if (BaseLevel < 50) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel);
+ else if (BaseLevel < 60) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 20));
+ else if (BaseLevel < 70) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 10));
+ else if (BaseLevel < 80) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 5));
+ else if (BaseLevel < 90) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 3));
+ else if (BaseLevel < 99) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 2));
+ else .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 2) * 2);
- set .@nJobExp, (JobLevel * (JobLevel - 3) * (JobLevel / 25 + 1) + (16 - (JobLevel * 2))) * 2;
+ .@nJobExp = (JobLevel * (JobLevel - 3) * (JobLevel / 25 + 1) + (16 - (JobLevel * 2))) * 2;
} else {
- if (BaseLevel < 30) set .@nBaseExp, .@BaseExp;
- else if (BaseLevel < 40) set .@nBaseExp, .@BaseExp + (BaseLevel * 10);
- else if (BaseLevel < 50) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * 2);
- else if (BaseLevel < 60) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 10));
- else if (BaseLevel < 70) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 5));
- else if (BaseLevel < 80) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 3));
- else if (BaseLevel < 90) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 2));
- else if (BaseLevel < 98) set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * BaseLevel);
- else set .@nBaseExp, .@BaseExp + (BaseLevel * BaseLevel * BaseLevel * 2);
+ if (BaseLevel < 30) .@nBaseExp = .@BaseExp;
+ else if (BaseLevel < 40) .@nBaseExp = .@BaseExp + (BaseLevel * 10);
+ else if (BaseLevel < 50) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * 2);
+ else if (BaseLevel < 60) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 10));
+ else if (BaseLevel < 70) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 5));
+ else if (BaseLevel < 80) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 3));
+ else if (BaseLevel < 90) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * (BaseLevel / 2));
+ else if (BaseLevel < 98) .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * BaseLevel);
+ else .@nBaseExp = .@BaseExp + (BaseLevel * BaseLevel * BaseLevel * 2);
- set .@nJobExp, (JobLevel * JobLevel * (JobLevel / 5 + 2) + (20 - JobLevel)) * 3;
+ .@nJobExp = (JobLevel * JobLevel * (JobLevel / 5 + 2) + (20 - JobLevel)) * 3;
}
getexp .@nBaseExp,.@nJobExp;
mes "[Rina]";
@@ -348,13 +348,13 @@ prontera,204,297,3 script Rina's Little Friend 4_DRAGON_EGG,{
case 1:
if (ADVJOB == 0) {
if (BaseLevel < 70)
- set .@nCharge,400000;
+ .@nCharge = 400000;
else if (BaseLevel < 90)
- set .@nCharge,450000;
+ .@nCharge = 450000;
else
- set .@nCharge,480000;
+ .@nCharge = 480000;
} else
- set .@nCharge,500000;
+ .@nCharge = 500000;
if (countitem(574) < 1 || countitem(1001) < 20 || Zeny < .@nCharge) {
mes "[Rina's Little Friend]";
mes "Hmm.";
@@ -381,7 +381,7 @@ prontera,204,297,3 script Rina's Little Friend 4_DRAGON_EGG,{
delitem 574,1; //Egg
delitem 1001,20; //Sparkling_Dust
Zeny -= .@nCharge;
- set .@nPercentage, rand(1,100);
+ .@nPercentage = rand(1,100);
if (.@nPercentage <= 41) {
mes "[Rina's Little Friend]";
mes "Life is given to the egg.";
diff --git a/npc/events/event_skill_reset.txt b/npc/events/event_skill_reset.txt
index ab8805736..4b0d2b2a7 100644
--- a/npc/events/event_skill_reset.txt
+++ b/npc/events/event_skill_reset.txt
@@ -14,7 +14,7 @@
//= Each 1 BaseLv need 20.000 Zeny, so be careful to use skill.
//============================================================
yuno,138,187,4 script Hypnotist Teacher 4_F_TELEPORTER,{
- set @npcname$,"[^D5A500Hypnotist^000000]";
+ @npcname$ = "[^D5A500Hypnotist^000000]";
mes @npcname$;
if(MISC_QUEST & 1024){
diff --git a/npc/events/gdevent_aru.txt b/npc/events/gdevent_aru.txt
index 1a69fea76..7b68eb980 100644
--- a/npc/events/gdevent_aru.txt
+++ b/npc/events/gdevent_aru.txt
@@ -29,7 +29,7 @@ OnTimer3600000:
arug_dun01,1,2,1 script Monster Controler1#aru 4_DOG01,{
OnEnable:
- set .@callwhere,rand(1,4);
+ .@callwhere = rand(1,4);
if (.@callwhere == 1) {
monster "arug_dun01",150,340,"Kublin",1980,1,"Monster Controler1#aru::OnMyMobDead";
}
@@ -67,8 +67,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
.@chk_yourgdname$ = getguildname(getcharid(2));
if ($@gdeventv_a1 == 0) {
if ($@gdevents_a$ == "") {
- set $@gdeventv_a1,1;
- set $@gdevents_a$,.@chk_yourgdname$;
+ $@gdeventv_a1 = 1;
+ $@gdevents_a$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -141,8 +141,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather your friends.";
close;
@@ -152,8 +152,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_a1,1;
- set $@gdevents_a$,.@chk_yourgdname$;
+ $@gdeventv_a1 = 1;
+ $@gdevents_a$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "arug_que01",103,133;
@@ -161,16 +161,16 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ahhh...";
@@ -199,8 +199,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_a1,1;
- set $@gdevents_a$,.@chk_yourgdname$;
+ $@gdeventv_a1 = 1;
+ $@gdevents_a$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -273,8 +273,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather your friends.";
close;
@@ -284,8 +284,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_a1,1;
- set $@gdevents_a$,.@chk_yourgdname$;
+ $@gdeventv_a1 = 1;
+ $@gdevents_a$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "arug_que01",103,133;
@@ -293,16 +293,16 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ah....";
@@ -342,8 +342,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_a1,1;
- set $@gdevents_a$,.@chk_yourgdname$;
+ $@gdeventv_a1 = 1;
+ $@gdevents_a$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -416,8 +416,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather you friends.";
close;
@@ -427,8 +427,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_a1,1;
- set $@gdevents_a$,.@chk_yourgdname$;
+ $@gdeventv_a1 = 1;
+ $@gdevents_a$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "arug_que01",103,133;
@@ -436,16 +436,16 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ah....";
@@ -465,8 +465,8 @@ arug_dun01,199,195,5 script Dwarf#aru_gd 4_M_DWARF,{
OnInit:
disablenpc "Dwarf#aru_gd";
- set $@gdeventv_a1,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdevents_a$ = "";
end;
OnEnable:
@@ -476,7 +476,7 @@ OnEnable:
arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
specialeffect EF_POISONHIT;
- set .@sprchg_gd,rand(1,5);
+ .@sprchg_gd = rand(1,5);
if (.@sprchg_gd == 1) {
setnpcdisplay "Pierrot Pier#aru_gd", 4_GHOSTRING;
}
@@ -502,7 +502,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
}
if (strcharinfo(0) == getguildmaster(getcharid(2))) {
if ($@gdeventv_a2 == 0) {
- set .@que_2143,questprogress(2143,PLAYTIME);
+ .@que_2143 = questprogress(2143,PLAYTIME);
if (!.@que_2143) {
setnpcdisplay "Pierrot Pier#aru_gd", 4_M_PIERROT;
mes "A lonely clown is juggling.";
@@ -657,7 +657,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
mes "[Pierrot Pier]";
mes "Let the game.. Begin!";
mapannounce "arug_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
- set $@gdeventv_a2,1;
+ $@gdeventv_a2 = 1;
donpcevent "Controller#gdevent_a::OnGame_start";
erasequest 2143;
close;
@@ -674,7 +674,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_a::OnStop";
- set $@gdeventv_a2,3;
+ $@gdeventv_a2 = 3;
donpcevent "eff_mvp#aru_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -759,7 +759,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
mes "[Pierrot Pier]";
mes "Let the game.. Begin!";
mapannounce "arug_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
- set $@gdeventv_a2,10;
+ $@gdeventv_a2 = 10;
donpcevent "Controller#gdevent_a::OnGame_start";
close;
}
@@ -782,7 +782,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
mapannounce "arug_que01", "Pierrot Pier: You've completeled an unbelievable task, I will give you the wonderful gift my master has prepared!! Ha!",bc_map,"0x99CC00";
mapannounce "arug_que01", "Pierrot Pier: Here, take Pierre's Treasure Boxes.",bc_map,"0x99CC00";
donpcevent "eff_mvp#aru_gd::OnMVP";
- set $@gdeventv_a2,5;
+ $@gdeventv_a2 = 5;
getitem 14596,10; //Pierre_Treasurebox
close;
}
@@ -815,7 +815,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_a::OnStop";
- set $@gdeventv_a2,3;
+ $@gdeventv_a2 = 3;
donpcevent "eff_mvp#aru_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -925,7 +925,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_a::OnStop";
- set $@gdeventv_a2,3;
+ $@gdeventv_a2 = 3;
donpcevent "eff_mvp#aru_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -989,7 +989,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_a::OnStop";
- set $@gdeventv_a2,3;
+ $@gdeventv_a2 = 3;
donpcevent "eff_mvp#aru_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -1018,7 +1018,7 @@ arug_que01,100,81,3 script Pierrot Pier#aru_gd 4_M_PIERROT,{
arug_que01,10,10,3 script Controller#gdevent_a 4_DOG01,{
OnInit:
- set $@gdeventv_a2,0;
+ $@gdeventv_a2 = 0;
end;
OnWin:
@@ -1036,7 +1036,7 @@ OnGame_start:
donpcevent "paper_sp_7_a::OnEnable";
donpcevent "paper_sp_8_a::OnEnable";
donpcevent "paper_sp_9_a::OnEnable";
- set .@roulette_where,rand(1,9);
+ .@roulette_where = rand(1,9);
if (.@roulette_where == 1) {
donpcevent "paper_sp_1_a::OnBingo";
}
@@ -1078,7 +1078,7 @@ OnTimer60000:
mapannounce "arug_que01", "Pierrot Pier: Time is up!",bc_map,"0x99CC00";
mapwarp "arug_que01","arug_que01",100,79;
enablenpc "removepp_aru_gd";
- set $@gdeventv_a2,2;
+ $@gdeventv_a2 = 2;
end;
OnTimer63000:
@@ -1090,23 +1090,22 @@ arug_que01,87,93,0 script paper_sp_1_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while1,0;
+ .@paper_while1 = 0;
while(1) {
if (.@paper_while1 == 100) {
break;
- }
- else {
- set .@paper_while1,.@paper_while1+1;
- set .@paper_x1,rand(81,95);
- set .@paper_y1,rand(87,100);
+ } else {
+ ++.@paper_while1;
+ .@paper_x1 = rand(81,95);
+ .@paper_y1 = rand(87,100);
makeitem 6030,1,"arug_que01",.@paper_x1,.@paper_y1; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x1,rand(81,95);
- set .@paper_y1,rand(87,100);
+ .@paper_x1 = rand(81,95);
+ .@paper_y1 = rand(87,100);
makeitem 6031,1,"arug_que01",.@paper_x1,.@paper_y1; //Glitering_PaperB
end;
}
@@ -1115,23 +1114,22 @@ arug_que01,102,93,0 script paper_sp_2_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while2,0;
+ .@paper_while2 = 0;
while(1) {
if (.@paper_while2 == 100) {
break;
- }
- else {
- set .@paper_while2,.@paper_while2+1;
- set .@paper_x2,rand(96,110);
- set .@paper_y2,rand(87,100);
+ } else {
+ ++.@paper_while2;
+ .@paper_x2 = rand(96,110);
+ .@paper_y2 = rand(87,100);
makeitem 6030,1,"arug_que01",.@paper_x2,.@paper_y2; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x2,rand(96,110);
- set .@paper_y2,rand(87,100);
+ .@paper_x2 = rand(96,110);
+ .@paper_y2 = rand(87,100);
makeitem 6031,1,"arug_que01",.@paper_x2,.@paper_y2; //Glitering_PaperB
end;
}
@@ -1140,23 +1138,22 @@ arug_que01,117,93,0 script paper_sp_3_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while3,0;
+ .@paper_while3 = 0;
while(1) {
if (.@paper_while3 == 100) {
break;
- }
- else {
- set .@paper_while3,.@paper_while3+1;
- set .@paper_x3,rand(111,124);
- set .@paper_y3,rand(87,100);
+ } else {
+ ++.@paper_while3;
+ .@paper_x3 = rand(111,124);
+ .@paper_y3 = rand(87,100);
makeitem 6030,1,"arug_que01",.@paper_x3,.@paper_y3; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x3,rand(111,124);
- set .@paper_y3,rand(87,100);
+ .@paper_x3 = rand(111,124);
+ .@paper_y3 = rand(87,100);
makeitem 6031,1,"arug_que01",.@paper_x3,.@paper_y3; //Glitering_PaperB
end;
}
@@ -1165,23 +1162,23 @@ arug_que01,87,80,0 script paper_sp_4_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while4,0;
+ .@paper_while4 = 0;
while(1) {
if (.@paper_while4 == 100) {
break;
}
else {
- set .@paper_while4,.@paper_while4+1;
- set .@paper_x4,rand(81,95);
- set .@paper_y4,rand(73,86);
+ ++.@paper_while4;
+ .@paper_x4 = rand(81,95);
+ .@paper_y4 = rand(73,86);
makeitem 6030,1,"arug_que01",.@paper_x4,.@paper_y4; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x4,rand(81,95);
- set .@paper_y4,rand(73,86);
+ .@paper_x4 = rand(81,95);
+ .@paper_y4 = rand(73,86);
makeitem 6031,1,"arug_que01",.@paper_x4,.@paper_y4; //Glitering_PaperB
end;
}
@@ -1190,23 +1187,22 @@ arug_que01,102,80,0 script paper_sp_5_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while5,0;
+ .@paper_while5 = 0;
while(1) {
if (.@paper_while5 == 100) {
break;
- }
- else {
- set .@paper_while5,.@paper_while5+1;
- set .@paper_x5,rand(96,110);
- set .@paper_y5,rand(73,86);
+ } else {
+ ++.@paper_while5;
+ .@paper_x5 = rand(96,110);
+ .@paper_y5 = rand(73,86);
makeitem 6030,1,"arug_que01",.@paper_x5,.@paper_y5; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x5,rand(96,110);
- set .@paper_y5,rand(73,86);
+ .@paper_x5 = rand(96,110);
+ .@paper_y5 = rand(73,86);
makeitem 6031,1,"arug_que01",.@paper_x5,.@paper_y5; //Glitering_PaperB
end;
}
@@ -1215,23 +1211,22 @@ arug_que01,117,80,0 script paper_sp_6_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while6,0;
+ .@paper_while6 = 0;
while(1) {
if (.@paper_while6 == 100) {
break;
- }
- else {
- set .@paper_while6,.@paper_while6+1;
- set .@paper_x6,rand(111,124);
- set .@paper_y6,rand(73,86);
+ } else {
+ ++.@paper_while6;
+ .@paper_x6 = rand(111,124);
+ .@paper_y6 = rand(73,86);
makeitem 6030,1,"arug_que01",.@paper_x6,.@paper_y6; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x6,rand(111,124);
- set .@paper_y6,rand(73,86);
+ .@paper_x6 = rand(111,124);
+ .@paper_y6 = rand(73,86);
makeitem 6031,1,"arug_que01",.@paper_x6,.@paper_y6; //Glitering_PaperB
end;
}
@@ -1240,23 +1235,22 @@ arug_que01,87,65,0 script paper_sp_7_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while7,0;
+ .@paper_while7 = 0;
while(1) {
if (.@paper_while7 == 100) {
break;
- }
- else {
- set .@paper_while7,.@paper_while7+1;
- set .@paper_x7,rand(81,95);
- set .@paper_y7,rand(59,72);
+ } else {
+ ++.@paper_while7;
+ .@paper_x7 = rand(81,95);
+ .@paper_y7 = rand(59,72);
makeitem 6030,1,"arug_que01",.@paper_x7,.@paper_y7; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x7,rand(81,95);
- set .@paper_y7,rand(59,72);
+ .@paper_x7 = rand(81,95);
+ .@paper_y7 = rand(59,72);
makeitem 6031,1,"arug_que01",.@paper_x7,.@paper_y7; //Glitering_PaperB
end;
}
@@ -1265,23 +1259,23 @@ arug_que01,102,65,0 script paper_sp_8_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while8,0;
+ .@paper_while8 = 0;
while(1) {
if (.@paper_while8 == 100) {
break;
}
else {
- set .@paper_while8,.@paper_while8+1;
- set .@paper_x8,rand(96,110);
- set .@paper_y8,rand(59,72);
+ ++.@paper_while8;
+ .@paper_x8 = rand(96,110);
+ .@paper_y8 = rand(59,72);
makeitem 6030,1,"arug_que01",.@paper_x8,.@paper_y8; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x8,rand(96,110);
- set .@paper_y8,rand(59,72);
+ .@paper_x8 = rand(96,110);
+ .@paper_y8 = rand(59,72);
makeitem 6031,1,"arug_que01",.@paper_x8,.@paper_y8; //Glitering_PaperB
end;
}
@@ -1290,23 +1284,23 @@ arug_que01,117,65,0 script paper_sp_9_a HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while9,0;
+ .@paper_while9 = 0;
while(1) {
if (.@paper_while9 == 100) {
break;
}
else {
- set .@paper_while9,.@paper_while9+1;
- set .@paper_x9,rand(111,124);
- set .@paper_y9,rand(59,72);
+ ++.@paper_while9;
+ .@paper_x9 = rand(111,124);
+ .@paper_y9 = rand(59,72);
makeitem 6030,1,"arug_que01",.@paper_x9,.@paper_y9; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x9,rand(111,124);
- set .@paper_y9,rand(59,72);
+ .@paper_x9 = rand(111,124);
+ .@paper_y9 = rand(59,72);
makeitem 6031,1,"arug_que01",.@paper_x9,.@paper_y9; //Glitering_PaperB
end;
}
@@ -1319,8 +1313,8 @@ OnInit:
end;
OnTouch2:
- set .@paper_aru_gd,countitem(6030);
- set .@spaper_aru_gd,countitem(6031);
+ .@paper_aru_gd = countitem(6030);
+ .@spaper_aru_gd = countitem(6031);
if ((.@paper_aru_gd > 0) || (.@spaper_aru_gd > 0)) {
delitem 6030,.@paper_aru_gd; //Glitering_PaperA
delitem 6031,.@spaper_aru_gd; //Glitering_PaperB
@@ -1444,7 +1438,7 @@ OnEnable:
OnMyMobDead:
if (mobcount("arug_que01","treg#aru_gd::OnMyMobDead") == 0) {
mapannounce "arug_que01", "Pierrot Pier: Beep! Oh, you already opened the gift? You sure are fast now, beep!",bc_map,"0x99CC00";
- set $@gdeventv_a2,5;
+ $@gdeventv_a2 = 5;
}
end;
}
@@ -1522,9 +1516,9 @@ arug_dun01,5,5,1 script Event controller#aru_gd 4_DOG01,{
donpcevent "Monster Controler1#aru::OnControler1#aru_gd";
donpcevent "Monster Controler1#aru::OnControler1#aru_gd";
disablenpc "Dwarf#aru_gd";
- set $@gdeventv_a1,0;
- set $@gdeventv_a2,0;
- set $@gdevents_a$,"";
+ $@gdeventv_a1 = 0;
+ $@gdeventv_a2 = 0;
+ $@gdevents_a$ = "";
close;
case 2:
mes "Good bye~";
diff --git a/npc/events/gdevent_sch.txt b/npc/events/gdevent_sch.txt
index a6df13889..22b70836e 100644
--- a/npc/events/gdevent_sch.txt
+++ b/npc/events/gdevent_sch.txt
@@ -29,7 +29,7 @@ OnTimer3600000:
schg_dun01,1,2,1 script Monster Controler1#sch 4_DOG01,{
OnEnable:
- set .@callwhere,rand(1,4);
+ .@callwhere = rand(1,4);
if (.@callwhere == 1) {
monster "schg_dun01",164,236,"Kublin",1980,1,"Monster Controler1#sch::OnMyMobDead";
}
@@ -67,8 +67,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
.@chk_yourgdname$ = getguildname(getcharid(2));
if ($@gdeventv_s1 == 0) {
if ($@gdevents_s$ == "") {
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -141,8 +141,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather your friends.";
close;
@@ -152,8 +152,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "schg_que01",103,133;
@@ -161,16 +161,16 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ahhh...";
@@ -199,8 +199,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -273,8 +273,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather your friends.";
close;
@@ -284,8 +284,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "schg_que01",103,133;
@@ -293,16 +293,16 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ah....";
@@ -341,8 +341,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
mes "[Dwarf]";
mes "Help me!";
mes "Please, help me!";
@@ -415,8 +415,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
next;
switch(select("Wait! I'm not ready yet.:Let's go!")) {
case 1:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "Take your time, and find a place to gather you friends.";
close;
@@ -426,8 +426,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
mes "If your friends visit me again later, I will guide them to that area again.";
mes "Don't forget, dwarves are grateful beings! Hahaha!";
delitem 6010,1; //Pickaxe
- set $@gdeventv_s1,1;
- set $@gdevents_s$,.@chk_yourgdname$;
+ $@gdeventv_s1 = 1;
+ $@gdevents_s$ = .@chk_yourgdname$;
close2;
setquest 2144;
warp "schg_que01",103,133;
@@ -435,16 +435,16 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
}
}
else {
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
mes "[Morestone]";
mes "I will tell you how to find him.";
mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
close;
}
case 2:
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
emotion e_sob;
mes "[Dwarf]";
mes "Ah....";
@@ -464,8 +464,8 @@ schg_dun01,194,148,5 script Dwarf#sch_gd 4_M_DWARF,{
OnInit:
disablenpc "Dwarf#sch_gd";
- set $@gdeventv_s1,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdevents_s$ = "";
end;
OnEnable:
@@ -475,7 +475,7 @@ OnEnable:
schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
specialeffect EF_POISONHIT;
- set .@sprchg_gd,rand(1,5);
+ .@sprchg_gd = rand(1,5);
if (.@sprchg_gd == 1) {
setnpcdisplay "Pierrot Pier#sch_gd", 4_GHOSTRING;
}
@@ -656,7 +656,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
mes "[Pierrot Pier]";
mes "Let the game.. Begin!";
mapannounce "schg_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
- set $@gdeventv_s2,1;
+ $@gdeventv_s2 = 1;
donpcevent "Controller#gdevent_s::OnGame_start";
erasequest 2143;
close;
@@ -673,7 +673,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -758,7 +758,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
mes "[Pierrot Pier]";
mes "Let the game.. Begin!";
mapannounce "schg_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
- set $@gdeventv_s2,10;
+ $@gdeventv_s2 = 10;
donpcevent "Controller#gdevent_s::OnGame_start";
close;
}
@@ -781,7 +781,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
mapannounce "schg_que01", "Pierrot Pier: You've completeled an unbelievable task, I will give you the wonderful gift my master has prepared!! Ha!",bc_map,"0x99CC00";
mapannounce "schg_que01", "Pierrot Pier: Here, take Pierre's Treasure Boxes.",bc_map,"0x99CC00";
donpcevent "eff_mvp#sch_gd::OnMVP";
- set $@gdeventv_s2,5;
+ $@gdeventv_s2 = 5;
getitem 14596,10; //Pierre_Treasurebox
close;
}
@@ -814,7 +814,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -924,7 +924,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -988,7 +988,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
next;
if (countitem(6031) > 0) {
donpcevent "Controller#gdevent_s::OnStop";
- set $@gdeventv_s2,3;
+ $@gdeventv_s2 = 3;
donpcevent "eff_mvp#sch_gd::OnMVP";
mes "[Pierrot Pier]";
mes "Wow~~!!";
@@ -1017,7 +1017,7 @@ schg_que01,100,81,3 script Pierrot Pier#sch_gd 4_M_PIERROT,{
schg_que01,10,10,3 script Controller#gdevent_s 4_DOG01,{
OnInit:
- set $@gdeventv_s2,0;
+ $@gdeventv_s2 = 0;
end;
OnWin:
@@ -1035,7 +1035,7 @@ OnGame_start:
donpcevent "paper_sp_7_s::OnEnable";
donpcevent "paper_sp_8_s::OnEnable";
donpcevent "paper_sp_9_s::OnEnable";
- set .@roulette_where,rand(1,9);
+ .@roulette_where = rand(1,9);
if (.@roulette_where == 1) {
donpcevent "paper_sp_1_s::OnBingo";
}
@@ -1077,7 +1077,7 @@ OnTimer60000:
mapannounce "schg_que01", "Pierrot Pier: Time is up!",bc_map,"0x99CC00";
mapwarp "schg_que01","schg_que01",100,79;
enablenpc "removepp_sch_gd";
- set $@gdeventv_s2,2;
+ $@gdeventv_s2 = 2;
end;
OnTimer63000:
@@ -1089,23 +1089,22 @@ schg_que01,87,93,0 script paper_sp_1_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while1,0;
+ .@paper_while1 = 0;
while(1) {
if (.@paper_while1 == 100) {
break;
- }
- else {
- set .@paper_while1,.@paper_while1+1;
- set .@paper_x1,rand(81,95);
- set .@paper_y1,rand(87,100);
+ } else {
+ ++.@paper_while1;
+ .@paper_x1 = rand(81,95);
+ .@paper_y1 = rand(87,100);
makeitem 6030,1,"schg_que01",.@paper_x1,.@paper_y1; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x1,rand(81,95);
- set .@paper_y1,rand(87,100);
+ .@paper_x1 = rand(81,95);
+ .@paper_y1 = rand(87,100);
makeitem 6031,1,"schg_que01",.@paper_x1,.@paper_y1; //Glitering_PaperB
end;
}
@@ -1114,23 +1113,22 @@ schg_que01,102,93,0 script paper_sp_2_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while2,0;
+ .@paper_while2 = 0;
while(1) {
if (.@paper_while2 == 100) {
break;
- }
- else {
- set .@paper_while2,.@paper_while2+1;
- set .@paper_x2,rand(96,110);
- set .@paper_y2,rand(87,100);
+ } else {
+ ++.@paper_while2;
+ .@paper_x2 = rand(96,110);
+ .@paper_y2 = rand(87,100);
makeitem 6030,1,"schg_que01",.@paper_x2,.@paper_y2; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x2,rand(96,110);
- set .@paper_y2,rand(87,100);
+ .@paper_x2 = rand(96,110);
+ .@paper_y2 = rand(87,100);
makeitem 6031,1,"schg_que01",.@paper_x2,.@paper_y2; //Glitering_PaperB
end;
}
@@ -1139,23 +1137,22 @@ schg_que01,117,93,0 script paper_sp_3_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while3,0;
+ .@paper_while3 = 0;
while(1) {
if (.@paper_while3 == 100) {
break;
- }
- else {
- set .@paper_while3,.@paper_while3+1;
- set .@paper_x3,rand(111,124);
- set .@paper_y3,rand(87,100);
+ } else {
+ ++.@paper_while3;
+ .@paper_x3 = rand(111,124);
+ .@paper_y3 = rand(87,100);
makeitem 6030,1,"schg_que01",.@paper_x3,.@paper_y3; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x3,rand(111,124);
- set .@paper_y3,rand(87,100);
+ .@paper_x3 = rand(111,124);
+ .@paper_y3 = rand(87,100);
makeitem 6031,1,"schg_que01",.@paper_x3,.@paper_y3; //Glitering_PaperB
end;
}
@@ -1164,23 +1161,22 @@ schg_que01,87,80,0 script paper_sp_4_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while4,0;
+ .@paper_while4 = 0;
while(1) {
if (.@paper_while4 == 100) {
break;
- }
- else {
- set .@paper_while4,.@paper_while4+1;
- set .@paper_x4,rand(81,95);
- set .@paper_y4,rand(73,86);
+ } else {
+ ++.@paper_while4;
+ .@paper_x4 = rand(81,95);
+ .@paper_y4 = rand(73,86);
makeitem 6030,1,"schg_que01",.@paper_x4,.@paper_y4; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x4,rand(81,95);
- set .@paper_y4,rand(73,86);
+ .@paper_x4 = rand(81,95);
+ .@paper_y4 = rand(73,86);
makeitem 6031,1,"schg_que01",.@paper_x4,.@paper_y4; //Glitering_PaperB
end;
}
@@ -1189,23 +1185,23 @@ schg_que01,102,80,0 script paper_sp_5_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while5,0;
+ .@paper_while5 = 0;
while(1) {
if (.@paper_while5 == 100) {
break;
}
else {
- set .@paper_while5,.@paper_while5+1;
- set .@paper_x5,rand(96,110);
- set .@paper_y5,rand(73,86);
+ ++.@paper_while5;
+ .@paper_x5 = rand(96,110);
+ .@paper_y5 = rand(73,86);
makeitem 6030,1,"schg_que01",.@paper_x5,.@paper_y5; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x5,rand(96,110);
- set .@paper_y5,rand(73,86);
+ .@paper_x5 = rand(96,110);
+ .@paper_y5 = rand(73,86);
makeitem 6031,1,"schg_que01",.@paper_x5,.@paper_y5; //Glitering_PaperB
end;
}
@@ -1214,23 +1210,22 @@ schg_que01,117,80,0 script paper_sp_6_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while6,0;
+ .@paper_while6 = 0;
while(1) {
if (.@paper_while6 == 100) {
break;
- }
- else {
- set .@paper_while6,.@paper_while6+1;
- set .@paper_x6,rand(111,124);
- set .@paper_y6,rand(73,86);
+ } else {
+ ++.@paper_while6;
+ .@paper_x6 = rand(111,124);
+ .@paper_y6 = rand(73,86);
makeitem 6030,1,"schg_que01",.@paper_x6,.@paper_y6; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x6,rand(111,124);
- set .@paper_y6,rand(73,86);
+ .@paper_x6 = rand(111,124);
+ .@paper_y6 = rand(73,86);
makeitem 6031,1,"schg_que01",.@paper_x6,.@paper_y6; //Glitering_PaperB
end;
}
@@ -1239,23 +1234,22 @@ schg_que01,87,65,0 script paper_sp_7_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while7,0;
+ .@paper_while7 = 0;
while(1) {
if (.@paper_while7 == 100) {
break;
- }
- else {
- set .@paper_while7,.@paper_while7+1;
- set .@paper_x7,rand(81,95);
- set .@paper_y7,rand(59,72);
+ } else {
+ ++.@paper_while7;
+ .@paper_x7 = rand(81,95);
+ .@paper_y7 = rand(59,72);
makeitem 6030,1,"schg_que01",.@paper_x7,.@paper_y7; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x7,rand(81,95);
- set .@paper_y7,rand(59,72);
+ .@paper_x7 = rand(81,95);
+ .@paper_y7 = rand(59,72);
makeitem 6031,1,"schg_que01",.@paper_x7,.@paper_y7; //Glitering_PaperB
end;
}
@@ -1264,23 +1258,22 @@ schg_que01,102,65,0 script paper_sp_8_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while8,0;
+ .@paper_while8 = 0;
while(1) {
if (.@paper_while8 == 100) {
break;
- }
- else {
- set .@paper_while8,.@paper_while8+1;
- set .@paper_x8,rand(96,110);
- set .@paper_y8,rand(59,72);
+ } else {
+ ++.@paper_while8;
+ .@paper_x8 = rand(96,110);
+ .@paper_y8 = rand(59,72);
makeitem 6030,1,"schg_que01",.@paper_x8,.@paper_y8; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x8,rand(96,110);
- set .@paper_y8,rand(59,72);
+ .@paper_x8 = rand(96,110);
+ .@paper_y8 = rand(59,72);
makeitem 6031,1,"schg_que01",.@paper_x8,.@paper_y8; //Glitering_PaperB
end;
}
@@ -1289,23 +1282,22 @@ schg_que01,117,65,0 script paper_sp_9_s HIDDEN_WARP_NPC,{
end;
OnEnable:
- set .@paper_while9,0;
+ .@paper_while9 = 0;
while(1) {
if (.@paper_while9 == 100) {
break;
- }
- else {
- set .@paper_while9,.@paper_while9+1;
- set .@paper_x9,rand(111,124);
- set .@paper_y9,rand(59,72);
+ } else {
+ ++.@paper_while9;
+ .@paper_x9 = rand(111,124);
+ .@paper_y9 = rand(59,72);
makeitem 6030,1,"schg_que01",.@paper_x9,.@paper_y9; //Glitering_PaperA
}
}
end;
OnBingo:
- set .@paper_x9,rand(111,124);
- set .@paper_y9,rand(59,72);
+ .@paper_x9 = rand(111,124);
+ .@paper_y9 = rand(59,72);
makeitem 6031,1,"schg_que01",.@paper_x9,.@paper_y9; //Glitering_PaperB
end;
}
@@ -1318,8 +1310,8 @@ OnInit:
end;
OnTouch2:
- set .@paper_sch_gd,countitem(6030);
- set .@spaper_sch_gd,countitem(6031);
+ .@paper_sch_gd = countitem(6030);
+ .@spaper_sch_gd = countitem(6031);
if ((.@paper_sch_gd > 0) || (.@spaper_sch_gd > 0)) {
delitem 6030,.@paper_sch_gd; //Glitering_PaperA
delitem 6031,.@spaper_sch_gd; //Glitering_PaperB
@@ -1443,7 +1435,7 @@ OnEnable:
OnMyMobDead:
if (mobcount("schg_que01","treg#sch_gd::OnMyMobDead") == 0) {
mapannounce "schg_que01", "Pierrot Pier: Beep! Oh, you already opened the gift? You sure are fast now, beep!",bc_map,"0x99CC00";
- set $@gdeventv_s2,5;
+ $@gdeventv_s2 = 5;
}
end;
}
@@ -1521,9 +1513,9 @@ schg_dun01,5,5,1 script Event controller#sch_gd 4_DOG01,{
donpcevent "Monster Controler1#sch::OnControler1#sch_gd";
donpcevent "Monster Controler1#sch::OnControler1#sch_gd";
disablenpc "Dwarf#sch_gd";
- set $@gdeventv_s1,0;
- set $@gdeventv_s2,0;
- set $@gdevents_s$,"";
+ $@gdeventv_s1 = 0;
+ $@gdeventv_s2 = 0;
+ $@gdevents_s$ = "";
close;
case 2:
mes "Good bye~";
diff --git a/npc/events/god_se_festival.txt b/npc/events/god_se_festival.txt
index 54bf2b6d3..3b7dd50e8 100644
--- a/npc/events/god_se_festival.txt
+++ b/npc/events/god_se_festival.txt
@@ -45,7 +45,7 @@ yuno,1,1,0 script Festival Manager#gq_fes0 4_F_HUGIRL,{
}
yuno,118,192,5 script Rmimi Ravies#gq_fes01 4_F_HUGIRL,{
- set .@GID, getcharid(2);
+ .@GID = getcharid(2);
if (countitem(7840) > 0) {
mes "[Rmimi Ravies]";
mes "This is the flower.";
@@ -166,7 +166,7 @@ OnDisable:
OnStart:
initnpctimer;
- set $@gqse_festival,1;
+ $@gqse_festival = 1;
end;
OnCall:
@@ -197,7 +197,7 @@ OnCall:
OnOver:
killmonster "yuno","Rmimi Ravies#gq_fes01::OnMyMobDead";
- set $@gqse_festival,0;
+ $@gqse_festival = 0;
stopnpctimer;
end;
@@ -423,7 +423,7 @@ rachel,1,1,0 script Festival Manager#gq_fes2 4_F_HUGIRL,{
}
rachel,132,117,3 script Rhehe Ravies#gq_fes03 4_F_HUGIRL,{
- set .@GID, getcharid(2);
+ .@GID = getcharid(2);
if (countitem(7840) > 0) {
mes "[Rhehe Ravies]";
mes "A flower!!";
@@ -548,7 +548,7 @@ OnDisable:
OnStart:
initnpctimer;
- set $@gqse_festival,1;
+ $@gqse_festival = 1;
end;
OnCall:
@@ -579,7 +579,7 @@ OnCall:
OnOver:
killmonster "rachel","Rhehe Ravies#gq_fes03::OnMyMobDead";
- set $@gqse_festival,0;
+ $@gqse_festival = 0;
stopnpctimer;
end;
diff --git a/npc/events/halloween_2006.txt b/npc/events/halloween_2006.txt
index 06c101529..426bff65b 100644
--- a/npc/events/halloween_2006.txt
+++ b/npc/events/halloween_2006.txt
@@ -296,7 +296,7 @@ geffen,145,132,3 script Hoirin#06_hw 4_F_NOVICE,{
mes "[Hoirin]";
mes "Just Bring Pumpkin Mojo, Pumpkin, and a Egg.";
mes "Leave the rest for me..You'll get to try the best pumkin pie!";
- set halloween, 100;
+ halloween = 100;
close;
}
mes "[Hoirin]";
@@ -355,7 +355,7 @@ geffen,145,132,3 script Hoirin#06_hw 4_F_NOVICE,{
if (select("Send me.:It's ok.") == 1) {
mes "[Hoirin]";
mes "Ok, go get the eggs.";
- set halloween, 101;
+ halloween = 101;
close2;
warp "nif_fild01", 162, 113;
end;
@@ -434,7 +434,7 @@ nif_in,19,32,3 script Deviruchi#06_hw 4_DEVIRUCHI,{
mes "Hmm...This would be good.";
mes "Here take this, and thanks again~";
delitem 12192, 1;//Pumpkin_Pie
- set @hw_temp,rand(1,3);
+ @hw_temp = rand(1,3);
if (@hw_temp == 2) getitem 12130,1; //Cookie_Bag
else getitem 7460,3; //Nifl_Express_Ticket
close;
@@ -518,7 +518,7 @@ nif_fild01,165,115,3 script Chicken Masta#06_hw 4_M_NFDEADMAN2,{
mes "Thanks.";
mes "Here are the eggs.";
Zeny -= 2000;
- set halloween, 102;
+ halloween = 102;
getitem 574,2; //Egg
close;
}
@@ -534,7 +534,7 @@ nif_fild01,165,115,3 script Chicken Masta#06_hw 4_M_NFDEADMAN2,{
mes "Thanks.";
mes "Here are the eggs.";
Zeny -= 1000;
- set halloween, 102;
+ halloween = 102;
getitem 574,1; //Egg
close;
}
@@ -614,7 +614,7 @@ nif_fild01,165,115,3 script Chicken Masta#06_hw 4_M_NFDEADMAN2,{
else
break;
}
- set .@hw_egg, .@input * 1000;
+ .@hw_egg = .@input * 1000;
if (Zeny < @hw_egg) {
mes "[Chicken Masta]";
mes "You don't seem to have enough zeny.";
@@ -626,7 +626,7 @@ nif_fild01,165,115,3 script Chicken Masta#06_hw 4_M_NFDEADMAN2,{
mes "If you want more eggs, find me more chickens.";
Zeny -= @hw_egg;
getitem 574, @input;//Egg
- set halloween, 102;
+ halloween = 102;
close;
}
else {
@@ -656,7 +656,7 @@ nif_fild01,167,113,3 script Masta's chicken#06_hw01 4_NFCOCK,{
emotion e_omg;
specialeffect EF_TELEPORTATION;
mes "The magic spell has been casted.";
- set halloween, 103;
+ halloween = 103;
disablenpc "Masta's chicken#"+strnpcinfo(1);
close2;
sleep 180000;
@@ -676,7 +676,7 @@ nif_fild01,167,113,3 script Masta's chicken#06_hw01 4_NFCOCK,{
}
- script HwChicken2::HwChicken2 -1,{
- set @egg_temp,rand(1,4);
+ @egg_temp = rand(1,4);
if( @egg_temp == 3) {
mes "As soon as you got close to the chicken and touched it, it disappeared completely.";
mes "You got an 'egg' in the place where the chicken disappeared.";
@@ -692,7 +692,7 @@ nif_fild01,167,113,3 script Masta's chicken#06_hw01 4_NFCOCK,{
}
- script HwChicken3::HwChicken3 -1,{
- set @egg_temp,rand(1,4);
+ @egg_temp = rand(1,4);
if( @egg_temp == 3) {
mes "As soon as you got close to the chicken and touched it, it disappeared completely.";
mes "You got an 'egg' in the place where the chicken disappeared.";
diff --git a/npc/events/halloween_2009.txt b/npc/events/halloween_2009.txt
index 95b3e2a11..f67841c15 100644
--- a/npc/events/halloween_2009.txt
+++ b/npc/events/halloween_2009.txt
@@ -246,80 +246,80 @@ prontera,220,72,5 duplicate(09Treats) Trick or Treater#iRO8 4_M_KID1,2,2
if (.@mapname$ == "prontera") {
switch(select("Geffen:Payon:Alberta:Aldebaran")) {
case 1:
- set .@HallowTown,3;
+ .@HallowTown = 3;
break;
case 2:
- set .@HallowTown,2;
+ .@HallowTown = 2;
break;
case 3:
- set .@HallowTown,4;
+ .@HallowTown = 4;
break;
case 4:
- set .@HallowTown,5;
+ .@HallowTown = 5;
break;
}
}
else if (.@mapname$ == "payon") {
switch(select("Prontera:Geffen:Alberta:Aldebaran")) {
case 1:
- set .@HallowTown,1;
+ .@HallowTown = 1;
break;
case 2:
- set .@HallowTown,3;
+ .@HallowTown = 3;
break;
case 3:
- set .@HallowTown,4;
+ .@HallowTown = 4;
break;
case 4:
- set .@HallowTown,5;
+ .@HallowTown = 5;
break;
}
}
else if (.@mapname$ == "geffen") {
switch(select("Prontera:Payon:Alberta:Aldebaran")) {
case 1:
- set .@HallowTown,1;
+ .@HallowTown = 1;
break;
case 2:
- set .@HallowTown,2;
+ .@HallowTown = 2;
break;
case 3:
- set .@HallowTown,4;
+ .@HallowTown = 4;
break;
case 4:
- set .@HallowTown,5;
+ .@HallowTown = 5;
break;
}
}
else if (.@mapname$ == "alberta") {
switch(select("Prontera:Geffen:Payon:Aldebaran")) {
case 1:
- set .@HallowTown,1;
+ .@HallowTown = 1;
break;
case 2:
- set .@HallowTown,3;
+ .@HallowTown = 3;
break;
case 3:
- set .@HallowTown,2;
+ .@HallowTown = 2;
break;
case 4:
- set .@HallowTown,5;
+ .@HallowTown = 5;
break;
}
}
else if (.@mapname$ == "aldebaran") {
switch(select("Prontera:Geffen:Payon:Alberta")) {
case 1:
- set .@HallowTown,1;
+ .@HallowTown = 1;
break;
case 2:
- set .@HallowTown,3;
+ .@HallowTown = 3;
break;
case 3:
- set .@HallowTown,2;
+ .@HallowTown = 2;
break;
case 4:
- set .@HallowTown,4;
+ .@HallowTown = 4;
break;
}
}
@@ -347,14 +347,14 @@ prontera,220,72,5 duplicate(09Treats) Trick or Treater#iRO8 4_M_KID1,2,2
break;
}
else {
- set .@fabric,countitem(1059);
- set .@jack,countitem(1062);
- set .@worn,countitem(6299);
- set .@crushed,countitem(6298);
- set .@whispers,0;
- set .@darklords,0;
+ .@fabric = countitem(1059);
+ .@jack = countitem(1062);
+ .@worn = countitem(6299);
+ .@crushed = countitem(6298);
+ .@whispers = 0;
+ .@darklords = 0;
- set .@total,.@fabric + .@jack + .@worn + .@crushed;
+ .@total = .@fabric + .@jack + .@worn + .@crushed;
if(.@total < .@input) {
mes "[Halloween Wizard]";
@@ -367,49 +367,49 @@ prontera,220,72,5 duplicate(09Treats) Trick or Treater#iRO8 4_M_KID1,2,2
if(.@fabric > 0) {
if(.@fabric >= .@input) {
delitem 1059,.@input;
- set .@whispers,.@whispers+.@input;
- set .@input,0;
+ .@whispers += .@input;
+ .@input = 0;
}
else{
delitem 1059,.@fabric;
- set .@input,.@input - .@fabric;
- set .@whispers,.@whispers+.@fabric;
+ .@input -= .@fabric;
+ .@whispers += .@fabric;
}
}
if(.@worn > 0 && .@input != 0) {
if(.@worn >= .@input) {
delitem 6299,.@input;
- set .@whispers,.@whispers+.@input;
- set .@input,0;
+ .@whispers += .@input;
+ .@input = 0;
}
else{
delitem 6299,.@worn;
- set .@input,.@input - .@worn;
- set .@whispers,.@whispers+.@worn;
+ .@input -= .@worn;
+ .@whispers += .@worn;
}
}
if(.@jack > 0 && .@input != 0) {
if(.@jack >= .@input) {
delitem 1062,.@input;
- set .@darklords,.@darklords+.@input;
- set .@input,0;
+ .@darklords += .@input;
+ .@input = 0;
}
else{
delitem 1062,.@jack;
- set .@input,.@input - .@jack;
- set .@darklords,.@darklords+.@jack;
+ .@input -= .@jack;
+ .@darklords += .@jack;
}
}
if(.@crushed > 0 && .@input != 0) {
if(.@crushed >= .@input) {
delitem 6298,.@input;
- set .@darklords,.@darklords+.@input;
- set .@input,0;
+ .@darklords += .@input;
+ .@input = 0;
}
else{
delitem 6298,.@crushed;
- set .@input,.@input - .@crushed;
- set .@darklords,.@darklords+.@crushed;
+ .@input -= .@crushed;
+ .@darklords += .@crushed;
}
}
if (.@input > 0) {
diff --git a/npc/events/lunar_2008.txt b/npc/events/lunar_2008.txt
index 6c81d0d38..0b51f468b 100644
--- a/npc/events/lunar_2008.txt
+++ b/npc/events/lunar_2008.txt
@@ -50,7 +50,7 @@ payon_in01,193,30,4 script Rice Mill Grandma#rat 1_F_ORIENT_04,{
mes "think you can help me?";
next;
if (select("Of course.:I don't even know you.") == 1) {
- set lunar_rat,1;
+ lunar_rat = 1;
mes "[" + strcharinfo(0)+"]";
mes "Of course.";
mes "What can I do?";
@@ -93,7 +93,7 @@ payon_in01,193,30,4 script Rice Mill Grandma#rat 1_F_ORIENT_04,{
mes "Please wait here a moment,";
mes "and I'll make you some pastry~";
delitem 7770,1; //Sweet_rice
- set lunar_rat,3;
+ lunar_rat = 3;
close;
}
else if (lunar_rat == 4) {
@@ -104,7 +104,7 @@ payon_in01,193,30,4 script Rice Mill Grandma#rat 1_F_ORIENT_04,{
mes "Please wait here a moment,";
mes "and I'll make you some pastry~";
delitem 7770,1; //Sweet_rice
- set lunar_rat,5;
+ lunar_rat = 5;
close;
}
mes "Oh, where are all the";
@@ -127,15 +127,15 @@ payon_in01,193,30,4 script Rice Mill Grandma#rat 1_F_ORIENT_04,{
mes "Would you mind being";
mes "a dear, and delivering";
mes "that to my son for me?";
- set lunar_rat,2;
+ lunar_rat = 2;
close;
}
else if (lunar_rat == 3 || lunar_rat == 5) {
- set .@reward,rand(1,100);
+ .@reward = rand(1,100);
if (.@reward <= 5) {
if (lunar_rat == 3) {
getitem 9038,1; // New_Year_Doll_Egg
- set lunar_rat,4;
+ lunar_rat = 4;
}
else if (lunar_rat == 5) {
getitem 668,1; // Red_Envelope
@@ -152,8 +152,8 @@ payon_in01,193,30,4 script Rice Mill Grandma#rat 1_F_ORIENT_04,{
// After getting the egg there is a chance to get an envelope with each turn in
if (rand(1,20) <= 5 && lunar_rat == 4) getitem 668,1; // Red_Envelope
// Set the quest accordingly for repeat turn-ins.
- if (lunar_rat == 3) set lunar_rat,2;
- else if (lunar_rat == 5) set lunar_rat,4;
+ if (lunar_rat == 3) lunar_rat = 2;
+ else if (lunar_rat == 5) lunar_rat = 4;
mes "It's not nearly enough";
mes "to repay you for what you've";
mes "done for me, but I'd like";
diff --git a/npc/events/nguild/nguild_dunsw.txt b/npc/events/nguild/nguild_dunsw.txt
index 9b24c50b6..f768405d7 100644
--- a/npc/events/nguild/nguild_dunsw.txt
+++ b/npc/events/nguild/nguild_dunsw.txt
@@ -14,7 +14,7 @@
//==================================================
function script F_GldDunSw {
- set .@GID, getcastledata(getarg(0),1);
+ .@GID = getcastledata(getarg(0),1);
if (.@GID == 0) {
mes "[ Echoing Voice ]";
mes " ' The one who can overcome an ordeal and show true bravery... will find the way... ' ";
diff --git a/npc/events/nguild/nguild_ev_agit.txt b/npc/events/nguild/nguild_ev_agit.txt
index 097abb53c..5461bb975 100644
--- a/npc/events/nguild/nguild_ev_agit.txt
+++ b/npc/events/nguild/nguild_ev_agit.txt
@@ -16,10 +16,10 @@
// Function for OnAgitStart =========================================
function script F_AgitStart {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
- set .@empx, getarg(2);
- set .@empy, getarg(3);
+ .@map$ = getarg(0);
+ .@castle$ = getarg(1);
+ .@empx = getarg(2);
+ .@empy = getarg(3);
maprespawnguildid .@map$,getcastledata(.@map$,1),2;
monster .@map$,.@empx,.@empy,"Emperium",1288,1,"Agit_"+.@castle$+"::OnAgitBreak";
@@ -30,8 +30,8 @@ function script F_AgitStart {
// Function for OnGuildBreak ======================================
function script F_GuildBreak {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
+ .@map$ = getarg(0);
+ .@castle$ = getarg(1);
killmonsterall .@map$;
@@ -44,18 +44,18 @@ function script F_GuildBreak {
// Function for OnAgitBreak ======================================
function script F_AgitBreak {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
+ .@map$ = getarg(0);
+ .@castle$ = getarg(1);
- set .@GID,getcharid(2);
+ .@GID = getcharid(2);
if (.@GID <= 0) return;
- set .@Economy,getcastledata(.@map$,2) - 5;
- if (.@Economy < 0) set .@Economy, 0;
+ .@Economy = getcastledata(.@map$,2) - 5;
+ if (.@Economy < 0) .@Economy = 0;
setcastledata .@map$, 2, .@Economy;
- set .@defence,getcastledata(.@map$,3) - 5;
- if (.@defence < 0) set .@defence, 0;
+ .@defence = getcastledata(.@map$,3) - 5;
+ if (.@defence < 0) .@defence = 0;
setcastledata .@map$, 3, .@defence;
setcastledata .@map$,1, .@GID;
@@ -66,12 +66,12 @@ function script F_AgitBreak {
disablenpc "Kafra Staff#"+.@castle$;
// remove investment data and kafra
- for( set .@i, 4; .@i <= 9; set .@i, .@i+1 )
+ for (.@i = 4; .@i <= 9; ++.@i)
setcastledata .@map$, .@i, 0;
// if the new guild doesn't have Guardian Research, erase guardians
if( getgdskilllv(.@GID,10002) == 0 )
- for( set .@i, 10; .@i <= 17; set .@i, .@i+1 )
+ for (.@i = 10; .@i <= 17; ++.@i)
setcastledata .@map$, .@i, 0;
return;
@@ -80,8 +80,8 @@ function script F_AgitBreak {
// Function for OnAgitEnd ======================================
function script F_AgitEnd {
- set .@map$, getarg(0);
- set .@castle$, getarg(1);
+ .@map$ = getarg(0);
+ .@castle$ = getarg(1);
gvgoff .@map$;
// Disable the following if statment to keep empty
diff --git a/npc/events/nguild/nguild_flags.txt b/npc/events/nguild/nguild_flags.txt
index 8c629adf9..dcd3dbc14 100644
--- a/npc/events/nguild/nguild_flags.txt
+++ b/npc/events/nguild/nguild_flags.txt
@@ -16,7 +16,7 @@
/// Flag Function
//============================================================
function script F_Flags {
- set .@GID, getcastledata(getarg(1),1);
+ .@GID = getcastledata(getarg(1),1);
if (getarg(5) == 0) return;
if (.@GID == 0) {
mes " [ Edict of the Divine Rune Midgard Kingdom ]";
diff --git a/npc/events/nguild/nguild_kafras.txt b/npc/events/nguild/nguild_kafras.txt
index 100751f7a..89570fe6d 100644
--- a/npc/events/nguild/nguild_kafras.txt
+++ b/npc/events/nguild/nguild_kafras.txt
@@ -16,7 +16,7 @@
function script F_GKafra {
cutin "kafra_01",2;
- set @GID, getcastledata(getarg(0),1);
+ @GID = getcastledata(getarg(0),1);
if (getcharid(2) == @GID && getgdskilllv(@GID,10001)) goto L_StartG;
mes "[Kafra Service]";
@@ -24,8 +24,8 @@ function script F_GKafra {
cutin "",255;
close;
L_StartG:
- set @wrpP[0], 200;
- set @wrpD$[0], getarg(1);
+ @wrpP[0] = 200;
+ @wrpD$[0] = getarg(1);
setarray @wrpC$[0], @wrpD$[0]+" ^880000"+@wrpP[0]+"^000000 z", "Cancel", "", "", "","";
callfunc "F_Kafra",2,0,0,0,800;
end;
diff --git a/npc/events/nguild/nguild_managers.txt b/npc/events/nguild/nguild_managers.txt
index 039ba9ee1..015ef20fd 100644
--- a/npc/events/nguild/nguild_managers.txt
+++ b/npc/events/nguild/nguild_managers.txt
@@ -23,7 +23,7 @@
//==============================================
function script F_GldManager {
- set @GID, getcastledata(getarg(1),1);
+ @GID = getcastledata(getarg(1),1);
mes "[ "+getarg(0)+" ]";
if (@GID == 0){
mes "I am waiting for my master. Brave adventurer, follow your destiny!";
diff --git a/npc/events/nguild/nguild_treas.txt b/npc/events/nguild/nguild_treas.txt
index 750eab88a..7a7cd64c8 100644
--- a/npc/events/nguild/nguild_treas.txt
+++ b/npc/events/nguild/nguild_treas.txt
@@ -39,7 +39,7 @@ function script F_GldTreas {
//sets the counter variable = to the box number amount
set getarg(3), getarg(2);
}
- for (set .@i,1; .@i <= getarg(3) ; set .@i,.@i+1) {
+ for (.@i = 1; .@i <= getarg(3); ++.@i) {
// set treasure box ID
set getarg(4), getarg(5) + (.@i+1) % 2;
areamonster getarg(0),getarg(6),getarg(7),getarg(8),getarg(9),"Treasure Chest",getarg(4),1,"Treasure_"+getarg(1)+"::OnDied";
@@ -71,13 +71,13 @@ OnRecvCastleN01:
end;
OnInit:
if($boxNumN01 == 0) end;
- set $@bxN01, $boxNumN01;
+ $@bxN01 = $boxNumN01;
callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324+rand(10),114,218,123,227,1;
end;
OnDied:
mapannounce "nguild_alde","Treasure Chest Broken Open",17;
- set $boxNumN01, $boxNumN01 -1;
+ --$boxNumN01;
if($boxNumN01 == 0) mapannounce "nguild_alde", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
end;
}
@@ -97,13 +97,13 @@ OnRecvCastleN02:
end;
OnInit:
if($boxNumN02 == 0) end;
- set $@bxN02, $boxNumN02;
+ $@bxN02 = $boxNumN02;
callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334+rand(10),150,108,158,114,1;
end;
OnDied:
mapannounce "nguild_gef","Treasure Chest Broken Open",17;
- set $boxNumN02, $boxNumN02 -1;
+ --$boxNumN02;
if($boxNumN02 == 0) mapannounce "nguild_gef", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
end;
}
@@ -122,13 +122,13 @@ OnRecvCastleN03:
end;
OnInit:
if($boxNumN03 == 0) end;
- set $@bxN03, $boxNumN03;
+ $@bxN03 = $boxNumN03;
callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344+rand(10),286,4,295,13,1;
end;
OnDied:
mapannounce "nguild_pay","Treasure Chest Broken Open",17;
- set $boxNumN03, $boxNumN03 -1;
+ --$boxNumN03;
if($boxNumN03 == 0) mapannounce "nguild_pay", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
end;
}
@@ -147,13 +147,13 @@ OnRecvCastleN04:
end;
OnInit:
if($boxNumN04 == 0) end;
- set $@bxN04, $boxNumN04;
+ $@bxN04 = $boxNumN04;
callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354+rand(10),6,204,15,213,1;
end;
OnDied:
mapannounce "nguild_prt","Treasure Chest Broken Open",17;
- set $boxNumN04, $boxNumN04 -1;
+ --$boxNumN04;
if($boxNumN04 == 0) mapannounce "nguild_prt", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
end;
}
diff --git a/npc/events/valentinesday_2009.txt b/npc/events/valentinesday_2009.txt
index edb151c6e..56195d06a 100644
--- a/npc/events/valentinesday_2009.txt
+++ b/npc/events/valentinesday_2009.txt
@@ -75,7 +75,7 @@ prontera,164,174,4 script Trader#Val09 1_M_MERCHANT,{
mes "Please use the Kafra Services.";
close;
}
- set .@price, .@input * 5000;
+ .@price = .@input * 5000;
if (Zeny < .@price) {
mes "[Marco Bassinio]";
mes "Looks like you don't have enough zeny with ya.";
@@ -195,7 +195,7 @@ prontera,147,171,5 script Packs Trader#Val09 1_M_MERCHANT,{
mes "Please use the Kafra Services.";
close;
}
- set .@price, .@input * 200;
+ .@price = .@input * 200;
if (Zeny < .@price) {
mes "[Packs Trader]";
mes "You don't have enough money.";
@@ -236,7 +236,7 @@ prontera,147,171,5 script Packs Trader#Val09 1_M_MERCHANT,{
mes "Please use the Kafra Services.";
close;
}
- set .@price, .@input * 200;
+ .@price = .@input * 200;
if (Zeny < .@price) {
mes "[Packs Trader]";
mes "You don't have enough money.";
@@ -277,7 +277,7 @@ prontera,147,171,5 script Packs Trader#Val09 1_M_MERCHANT,{
mes "Please use the Kafra Services.";
close;
}
- set .@price, .@input * 600;
+ .@price = .@input * 600;
if (Zeny < .@price) {
mes "[Packs Trader]";
mes "You don't have enough money.";
@@ -377,7 +377,7 @@ prontera,154,185,5 script Event Ring Maker#Val09 4_F_KAFRA7,{
delitem 7174,1;
delitem 7948,1;
Zeny -= 1000;
- set iROval09ring,1;
+ iROval09ring = 1;
if (Sex) {
getnameditem 12742,strcharinfo(0);
} else {
@@ -457,10 +457,10 @@ prontera,157,185,4 script Valentine Vote Manager#v 4_F_KAFRA5,{
mes "I'll take those silver rings, and count the votes for you.";
mes "Thank you for participating.";
delitem 7947,.@input;
- set Val09Rings,Val09Rings+.@input;
+ Val09Rings += .@input;
if (Val09Rings > $Val09votes_M) {
- set $Val09votes_M,Val09Rings;
- set $Val09name_M$,strcharinfo(0);
+ $Val09votes_M = Val09Rings;
+ $Val09name_M$ = strcharinfo(0);
}
next;
break;
@@ -485,10 +485,10 @@ prontera,157,185,4 script Valentine Vote Manager#v 4_F_KAFRA5,{
mes "I'll take those gold rings, and count the votes for you.";
mes "Thank you for participating.";
delitem 7946,.@input;
- set Val09Rings,Val09Rings+.@input;
+ Val09Rings += .@input;
if (Val09Rings > $Val09votes_F) {
- set $Val09votes_F,Val09Rings;
- set $Val09name_F$,strcharinfo(0);
+ $Val09votes_F = Val09Rings;
+ $Val09name_F$ = strcharinfo(0);
}
next;
break;
diff --git a/npc/events/valentinesday_2012.txt b/npc/events/valentinesday_2012.txt
index 2d74cb1a5..d113bd480 100644
--- a/npc/events/valentinesday_2012.txt
+++ b/npc/events/valentinesday_2012.txt
@@ -13,9 +13,9 @@
//============================================================
mosk_in,21,246,5 script Pinkamenia 1_F_LIBRARYGIRL,{
- set .@n$,"^0000FF[Pinkamenia]^000000";
+ .@n$ = "^0000FF[Pinkamenia]^000000";
if (#V_QUE12==3) {
- set .@LFlowerID,7864;
+ .@LFlowerID = 7864;
setarray .@SweetsID[0],538,558,539,573,559,560,12062,596,597,12414,12319;
setarray .@SweetsCost[0],1,2,5,10,10,10,15,15,15,20,20;
mes .@n$;
@@ -29,10 +29,10 @@ mosk_in,21,246,5 script Pinkamenia 1_F_LIBRARYGIRL,{
mes .@n$;
mes "Select an item.";
mes "The amount of Love Flowers you'll need is in brackets.";
- for(set .@i,0; .@i < getarraysize(.@SweetsID); set .@i,.@i+1)
- set .@menu$, .@menu$+"^00AA00["+.@SweetsCost[.@i]+"]^000000 "+getitemname(.@SweetsID[.@i])+":";
+ for(.@i = 0; .@i < getarraysize(.@SweetsID); ++.@i)
+ .@menu$ += "^00AA00["+.@SweetsCost[.@i]+"]^000000 "+getitemname(.@SweetsID[.@i])+":";
next;
- set .@choice, select(.@menu$)-1;
+ .@choice = select(.@menu$)-1;
mes .@n$;
if (countitem(.@LFlowerID) < .@SweetsCost[.@choice]) {
mes "You'll need more Love Flowers if you want that!";
@@ -40,8 +40,8 @@ mosk_in,21,246,5 script Pinkamenia 1_F_LIBRARYGIRL,{
}
mes "Are you sure you want to trade ^00aa00"+.@SweetsCost[.@choice]+"x Love Flower ^000000 for ^0055FF"+getitemname(.@SweetsID[.@choice])+"^000000?";
if(select("No, I've changed my mind.:Yes, trade!") == 1) close;
- set .@new, .@LFlowerID - .@SweetsCost[.@choice];
- if (.@new < 0) set .@new, 0;
+ .@new = .@LFlowerID - .@SweetsCost[.@choice];
+ if (.@new < 0) .@new = 0;
delitem .@LFlowerID, .@SweetsCost[.@choice];
getitem .@SweetsID[.@choice],1;
mes "Have fun with your item!";
@@ -68,7 +68,7 @@ mosk_in,21,246,5 script Pinkamenia 1_F_LIBRARYGIRL,{
mes "Flowers, you can exchange";
mes "them for some sweets here.";
mes "See you soon!";
- set #V_QUE12,3;
+ #V_QUE12 = 3;
close;
} else if (#V_QUE12==1) {
mes .@n$;
@@ -91,7 +91,7 @@ mosk_in,21,246,5 script Pinkamenia 1_F_LIBRARYGIRL,{
mes "to bring a +8 Cake Hat";
mes "to the Baker Extraordinaire, who";
mes "is standing right next to me!";
- set #V_QUE12,1;
+ #V_QUE12 = 1;
close;
}
mes .@n$;
@@ -105,7 +105,7 @@ OnInit:
}
mosk_in,21,244,3 script Baker Extraordinaire 4_M_NOVELIST,{
- set .@n$,"^0000FF[Baker Extraordinaire]^000000";
+ .@n$ = "^0000FF[Baker Extraordinaire]^000000";
if(#V_QUE12==3) {
mes .@n$;
mes "Exchange your Love Flowers with Pinkamenia!";
@@ -139,7 +139,7 @@ mosk_in,21,244,3 script Baker Extraordinaire 4_M_NOVELIST,{
mes "our chocolates. Now get";
mes "15 Love Flowers and bring";
mes "them to Pinkamenia!";
- set #V_QUE12,2;
+ #V_QUE12 = 2;
close;
} else {
mes "Sorry, but where is your";
diff --git a/npc/events/xmas.txt b/npc/events/xmas.txt
index 72048985d..e420f9e6d 100644
--- a/npc/events/xmas.txt
+++ b/npc/events/xmas.txt
@@ -22,13 +22,13 @@
xmas_in,100,96,4 script Santa Claus::Santa2 4_M_SANTA,{
mes "[Santa Claus]";
- if(xmas_npc==0) set xmas_npc, 1; // For Lutie & Bard quest
+ if(xmas_npc==0) xmas_npc = 1; // For Lutie & Bard quest
if(#event_xmas > 0 && #event_xmas < 30 ) goto L_Start;
mes "Merry Christmas!";
if(Class==0 || #event_xmas>=30 ) close; //anti exploit protection
mes "I have a gift for you! Ho Ho Ho!";
getitem rand(664,667),1; //gives one of 4 gift boxes
- set #event_xmas,#event_xmas+1;
+ ++#event_xmas;
close;
L_Start:
@@ -84,7 +84,7 @@ L_Start:
mes "fake Santas. Keep it up!";
next;
getitem 644,1; //Gift Box Prototype
- set #event_xmas,#event_xmas+1;
+ ++#event_xmas;
mes "[Santa Claus]";
mes "There's your reward.";
mes "If you get 3 more, I'll give you another.";