diff options
Diffstat (limited to 'npc/events')
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."; |