Jump to content

Blazing Spear

Members
  • Posts

    208
  • Joined

  • Last visited

Everything posted by Blazing Spear

  1. can anyone share the all Sealed MVP cards texture thanks
  2. it because some item is wrong bonuses
  3. Is there other way faster to convert idnum2itemdesctable+idnum2itemdisplaynametable+idnum2itemresnametable=iteminfo.lub??
  4. do you include all translation from here: http://rathena.org/board/topic/71122-project-2012-client-translation/ by the way thanks for this!!
  5. but some of the boss card are not there like dark lord, ifrit, eddga, fallen bishop, lord of death, high wizard, dark snake lord
  6. i think you missed something you need to add also in iteminfo.lub in your ro/system
  7. Sealed Dracula Card Compounded on: Weapon Description: There's 5% rate that 5% of damage dealt to enemies will be absorbed as SP. If compounded equipment is refined to +15 and above, the absorb rate increase to 7%. Sealed Turtle General CardCompounded on: Weapon Description: ATK increases by 10%, Activate Auto Spell during physical attack to cast [Magnum Break] Lv10. If compounded equipment is refined to +15 and above, ATK increases by 5%. Sealed Knight of Windstorm CardCompounded on: Weapon Description: Activate Auto Spell during physical attack to cast skill [storm Gust] Lv1. When character attacks enemy, have chance to inflict Frozen status on enemies. If compounded equipment is refined to +15 and above, have higher chance to inflict Frozen status on enemies. Sealed Lady Tanee CardCompounded on: Shoes Description: MHP -60%, MSP +50%. Have chance to drop Banana when defeating monsters; Increases effect of Banana by 50%. If compounded equipment is refined to +15 and above, MHP -50%, MSP +50%; Have chance to drop Banana when defeating monsters; Increases effect of Banana by 80%. Sealed Tao Gunka CardCompounded on: Armor Description: MaxHP + 50%, DEF, MDEF - 50. If compounded equipment is refined to +15 and above, MaxHP + 75%, DEF, MDEF - 50. Sealed Amon RaCompounded on: Shoes Description: All status +1. When character receives damage of physical attack, there is certain rate to activate Auto Spell and cast skill [Kyrie Eleison] Lv5. If this card is equipped by character with 99 INT, the rate of using skill [Kyrie Eleison] is increased. If compounded equipment is refined to +15 and above, cast skill [Kyrie Eleison] Lv8. Sealed Ktullanux CardCompounded on: Armor Description: Increases physical damage to Fire monsters by 25%. Adds a chance to auto casting Lv 10 Frost Nova when wearer receives physical or magic damage. If compounded equipment is refined to +15 and above, increases physical damage to fire monsters by 10% Sealed Mistress CardCompounded on: Headgear Description: Can use magical spells without consuming gemstones. Spend extra 50% SP when using skills. If compounded equipment is refined to +15 and above, spend extra 35% SP when using skills Sealed Kiel CardCompounded on: Headgear Description: Reduce Cast Delay of all skills by 15%. If the compounded equipment is refined to +15 and above, reduce cast delay 5% Sealed Boss Ygnizem CardCompounded on: Shoes Description: Every 15 seconds will recover 50 HP and 10 SP, MHP and MSP +5% If compounded equipment is refined to +15 and above, HP and SP recovery period shortened to 10 seconds, MHP and MSP +2%. Sealed Beelzebub CardCompounded on: Accessory Description: Reduce Floating Cast Time by 15% Sealed Sniper CardCompouned on: Weapon Description: Adds 5% chance of absorbing 10% of the physical damage inflicted on an enemy by the wearer as HP, but also reduces HP Recovery by 100%. If compounded equipment is refined to +15 and above, 5% chance of absorbing 10% of the physical damage inflicted on an enemy by the wearer as HP Sealed Orc Lord CardCompounded on: Armor Description: Can reflect 15% damage to enemies when being physically attacked in short range. If compounded equipment is refined to +15 and above, can reflect 25% damage to enemies. Sealed High Priest CardCompounded on: Armor Description: Adds a chance of autocasting Lv1 Assumption on the wearer each time the wearer is physically or magically attacked. If compounded equipment is refined to +15 and above, it has higher chance to autocast the skill Sealed Master Smith CardCompounded on: Weapon Description: Adds a 5% chance of destroying an enemy's weapon and a 4% chance of destroying its armor each time the wearer physically attacks. If compounded equipment is refined to +15 and above, has a 8% chance of destroying an enemy's weapon and a 6% chance of destroying its armor each time the wearer physically attacks. Sealed Vesper CardCompound on: Headgear Description: Ignores 15% of Boss Monster's Magic Defense Rate when inflicting magic attacks againts them. If compounded equipment is refined to +15 and above, Ignores 25% of Boss Monster's Magic Defense Rate when inflicting magic attacks againts them. Dex + 2 Sealed Eddga CardCompounded on: Shoes Description: Unlimited use of [Endure] skill. Reduces 50% MaxHP, If compounded equipment is refined to +15 and above, Reduces 35% MaxHP. Sealed Gloomy Under Knight CardCompounded on: Armor Description: Increases Physical damage to Holy, Shadow, Angel and Demon monsters by 20%, If the compounded equipment is refined to +15 and above, increases Physical damage to Holy, Shadow, Angel and Demon monsters by 10%. Sealed Dark Lord CardCompounded on: Shoes Description: When character receives damage, there will be certain rate of activating Auto Spell to cast Level5 skill of Meteor Storm. If equipped with Dark Illusion Card, MAXHP+10% and MAXSP+10%. If compounded equipment is refined to +15 and above, MAXHP+5% and MAXSP+5% upon equipped with Dark Illusion Card. Sealed Fallen Bishop CardCompounded on: Shoes Description: MATK+5%, MaxSP-50%. Increases magic damage to Demihuman and Angel monsters by 25%. If compounded equipment is refined to +15 and above, MATK+8%, MaxSP-50%. Increases magic damage to Demihuman and Angel monsters by 33%. Sealed Moonlight Flower CardCompounded on: Headgear Description: Can use Increase AGI Lv.1. If compounded equipment is refined to +15 and above, can use Increase AGI Lv.5. Sealed Orc Hero CardCompounded on: Headgear Description: 40% rate avoids being Stun. VIT+3 If compounded equipment is refined to +15, 60% rate avoids being Stun. Sealed Garm CardCompounded on: Armor Description: Whenever character receives damage from physical attack, there is 25% chance to inflict enemies with Frozen status. If compounded equipment is refined to +15 and above, there is 40% chance to inflict enemies with Frozen status. Sealed Ifrit CardCompounded on: Accessory Description: ATK, Critical, Hit is increased depending on the 50% of wearer's job level divided by 10. Autospell Earthquake lvl2 by a certain chance when receiving physical attack. Sealed Lord of the Death CardCompounded on: Weapon Description: There is a certain rate to inflict Coma status on enemies, There is a certain rate to inflict Stunned, Cursed, Silence, Poisoned, Wound status in melee combat. If compounded equipment is refined to +15 and above, the rate to inflict the status above is increased. Sealed High Wizard CardCompounded on: Headgear Description: The wearer's attack will ignore the MDEF of regular monsters, Increase Floating Casting Time by 150% and reduces SP Recovery by 150%, drains 3000 SP when the compounded headgear is unequipped. If compounded equipment is refined to +15 and above, increase Floating Casting Time by 120%, reduces SP Recovery by 120%, drains 2000 SP when the compounded headgear is unequipped. Sealed Incantation Samurai CardCompounded on: Weapon Description: Pierce Defense of normal monster. HP of wearer will not recover automatically and losses 888 HP every 5seconds. When equip wearers will loses 999HP. If compounded equipment is refined to +15 and above, wearer will losses 777HP every 8seconds. Credit: Thanks to my Fairy Tail guildmate Sayuri for sharing the in-game description Sealed Atroce CardCompounded on: Weapon Description: ATK+15 Has a chance attack speed increases by 50% for 10 seconds during physical attack. If compounded equipment is refined to +15 and above, ATK+25, Has a chance attack speed increases by 75% for 10 seconds during physical attack. Sealed Dark Snake Lord CardCompounded on: Headgear Description: INT+3 Have chance resist to Darkness and Curse. If compounded equipment is refined to +15 and above, have higher chance resist to Darkness and Curse Sealed Phreeoni CardCompounded on: Weapon Description: HIT +50 If compounded equipment is refined to +15 and above, HIT +75 Sealed White Lady CardCompounded on: Headgear Description: Increases the effect of the Heal, Sanctuary and Potion Pitcher skills by 15% when they are cast by the wearer, but also increases SP Consumption by 30%. If compounded equipment is refined to +15 and above, increases the effect of the Heal, Sanctuary and Potion Pitcher skills by 25% when they are cast by the wearer, but also increases SP Consumption by 20%. Sealed Pharaoh CardCompounded on: Headgear Description: Reduce 15% of normal SP amount required to perform the skill. Upgrade Maya Purple CardCompounded on: Headgear Description: Player will be able to see enemies that are in Hiding or Clocking status. ALL Status +1. Can use Lv1 Ruwachf.
  8. What Client date starting to read iteminfo.lub cause im using 2012-04-10 and my client doesnt read my iteminfo.lub cause i want to use iteminfo.lub because its much comfortable to me to add custom stuff need some advice?? thanks!!
  9. How to make this script work with check 632 item first before fishing then if the player dont have enough item message like this "You do not have Fatty Chubby" comodo,196,112,6 script School of Fish 723,{ if(countitem(632) < 1) goto L_Exit; L_Exit: mes "You do not have Fatty Chubby."; close; delitem 632,1; if (isequipped(2764)) && (isequipped(2775)){ specialeffect2 EF_BUBBLE; set .@fcast,15; if (isequipped(2550)) set .@fcast,.@fcast-3; //Fisher's Muffler. } if (isequipped(2443)) set .@fcast,.@fcast-2; //Fish_Shoes } if (isequipped(5380)) set .@fcast,.@fcast-5; //Fish_Shoes } progressbar "ffffff",.@fcast; if (rand(1,20) == 2) { getitem 6096,5; //Big Fish specialeffect EF_BUBBLE; mapannounce "comodo","" + strcharinfo(0) + " has caught a 5 Tuna!!!",bc_map,"0xff77ff"; end; } set .@rhea_ran,rand(1,70); if (.@rhea_ran < 20) { specialeffect2 610; getitem 29183,1; //Anchovy } else if (.@rhea_ran == 20) { specialeffect2 610; getitem 29184,1; //Bass } else if (.@rhea_ran == 21) { specialeffect2 610; getitem 29185,1; //Crab } else if (.@rhea_ran == 22) { specialeffect2 610; getitem 29186,1; //Eel } else if (.@rhea_ran == 23) { specialeffect2 610; getitem 29187,1; //Jelly Fish } else if (.@rhea_ran == 24) { specialeffect2 610; getitem 29188,1; //Lobster } else if (.@rhea_ran == 25) { specialeffect2 610; getitem 29189,1; //Perch } else if (.@rhea_ran == 26) { specialeffect2 610; getitem 29190,1; //Pike } else if (.@rhea_ran == 27) { specialeffect2 610; getitem 29191,1; //Puffer } else if (.@rhea_ran == 28) { specialeffect2 610; getitem 9192,1; //Salmon } else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) { specialeffect2 610; getitem 632,1; //Fatty Chubby Earthworm } else { mes "Nothing was caught."; specialeffect2 611; close; } if (rand(1,200) == 3) { getitem 6096,20; //Gift_Box mapannounce "comodo","" + strcharinfo(0) + " has caught a 20 Tuna Fish!!",bc_map,"0x0000ff"; } if (rand(1,500) == 3) { getitem 6096,30; //Old_Blue_Box mapannounce "comodo","" + strcharinfo(0) + " has caught an 30 Tuna Fish!",bc_map,"0x00ffff"; } if (rand(1,3000) == 3) { getitem 6096,50; //Old_Violet_Box mapannounce "comodo","" + strcharinfo(0) + " has caught an 50 Tuna Fish!!",bc_map,"0x44ff44"; } end; } else { mes "Fish are swimming in the water."; close; } } comodo.gat,189,108,4 duplicate(School of Fish) School of Fish#1 1158 comodo.gat,183,111,4 duplicate(School of Fish) Tilapya#20 2082 comodo.gat,218,108,4 duplicate(School of Fish) School of Fish#21 1069 comodo.gat,228,108,3 duplicate(School of Fish) School of Fish#22 1158 comodo.gat,214,112,4 duplicate(School of Fish) School of Fish#23 723 comodo.gat,189,122,4 duplicate(School of Fish) Mr Crab#23 1073 comodo.gat,192,106,4 duplicate(School of Fish) Octopus#23 1144 //Shop comodo,205,112,4 shop Bulantiro 1543,2764:50000000,2775:50000000,2550:100000000,2443:200000000
  10. i already attach 1 but here is the latest even i put "menu:" same error i got
  11. Request Shop that item used instead of zeny example using bronze coin, silver coin, gold coin, mithril coin thanks!!
  12. What is wrong with this?? //===== eAthena Script ======================================= //= Last Warp Super Warper NPC //===== By: ================================================== //= Kookith //===== Description: ========================================= //= This is a warper. I am sure that is self explanatory. //= Last Warp Feature added! //============================================================ prontera,159,190,5 script Warper::Warper 859,{ mes "[Warp NPC]"; mes "Hi!, I can warp you to any Town, Field, or Dungeon you would like to go to."; next; mes "[Warp NPC]"; mes "Where would you like to be warped to?"; next; menu "Last Warp",lastmap,"Event Room",eventroom,"Modified Games",modsgame,"Towns",town,"Dungeons",dungeon,"Fields",field,"WoE",woe; woe: menu "Prontera Guild",-; set lastmap$,"prt_gld.gat"; set lastx,160; set lasty,31; warp "prt_gld.gat",160,31; close; eventroom: mes "[Warp NPC]"; mes "Ill Warp you."; warp "quiz_02.gat",162,347; end; modsgame: mes "[Warp NPC]"; mes "Please select a Warp. You will be warped to the center of that map."; next; menu "Barricade Repair Test",repair, "Emperium Breaker Test",breaker, "Simon Says",simon, "Memory Game",memory, "Sound Memory",sound; repair: mes "[Warp NPC]"; mes "Ill Warp you."; warp "quiz_02.gat",249,380; end; breaker: mes "[Warp NPC]"; mes "Ill Warp you."; warp "quiz_02.gat",45,378; end; simon: mes "[Warp NPC]"; mes "Ill Warp you."; warp "quiz_02.gat",337,73; end; memory: mes "[Warp NPC]"; mes "Ill Warp you."; warp "quiz_02.gat",147,385; end; sound: mes "[Warp NPC]"; mes "Ill Warp you."; warp "quiz_02.gat",349,380; end; town: menu "Prontera",wprontera, "Evolution (Main Capital)",wevol, "Alberta",walberta, "Aldebaran",waldebaran, "Amatsu",wamatsu, "Ayothaya",wayot, "Comodo",wcomodo, "Einbech (Mining Village)",weinbech, "Einbroch",weinbroch, "Geffen",wgeffen, "Gonryun",wgonryun, "Hugel",whugel, "Izlude",wizlude, "Jawaii",wjawaii, "Lighthalzen",wlighthalzen, "Louyang",wlouyang, "Lutie",wxmas, "Morroc",wmorroc, "Nameless Island",wnameless, "Niflheim",wniflheim, "Payon",wpayon, "Rachel",wafeltz, "Thor Camp",wthorcamp, "Veins",wveins, "Yuno",wyuno, "Umbala",wumbala; field: menu "Amatsu Fields",wamafild, "Ayothaya Fields",wayofild, "Comodo Fields",wcmdfild, "Einbroch Fields",weinfild, "Geffen Fields",wgeffild, "Gonryun Fields",wgonfild, "Hugel Fields",whufild, "Lighthalzen Fields",wlhzfild, "Louyang Field",wloufild, "Lutie Field",wxmasfild, "Mjolnir Fields",wmjolnir, "Moscovia Fields",wmosc, "Niflheim Fields",wniffild, "Odin Temple",wodint, "Payon Forests",wpayfor, "Prontera Fields",wprtfild, "Rachel Fields",warunfild, "Sograt Deserts",wmocfild, "Umbala Fields",wumfild, "Veins Fields",wveinsfild, "Yuno Fields",wyunofild; dungeon: menu "Abbey, Cursed Monastery",wabbey, "Abyss Lakes",wabyss, "Amatsu Dungeon",ama, "Anthell",ant, "Ayothaya Dungeons",wayodun, "Beach Dungeon",beach, "Byalan Dungeon",byalan, "Clock Tower",clock, "Coal Mines",coal, "Culverts",culvert, "Einbroch Dungeons",weindun, "Gefenia",gefenia, "Geffen Dungeon",geffen, "Glast Heim",glast, "Gonryun Dungeon",gon, "Hidden Dungeon",hidden, "Ice Dungeon",iced, "Juperos Dungeons",wjuper, "Kiel Dungeons",wkieldun, "Lighthalzen",wlhzdun, "Louyang Dungeons",wloudun, "Magma Dungeon",magma, "Moscovia Dungeon",wmosk, "Orc Dungeon",orc, "Payon Dungeon",payon, "Pyramids",pyramids, "Rachel Sanctuary",rachels, "Sphinx",sphinx, "Sunken Ship",sunken, "Thanatos Tower",wthat, "Thor Volcano",wthor, "Toy Factory",toy, "Turtle Dungeon",turtle, "Umbala Dungeons",wumdun, "Dimensonal Gorge",dimen; gdungeon: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Baldur Guild Dungeon (Guild Dungeon 1)",dgldun1, "Luina Guild Dungeon (Guild Dungeon 2)",dgldun2, "Valkyrie Guild Dungeon (Guild Dungeon 3)",dgldun3, "Britoniah Guild Dungeon (Guild Dungeon 4)",dgldun4; lastmap: if(lastmap$=="") { mes "You have not warped anywhere yet!"; close; } warp lastmap$,lastx,lasty; end; //------------------------------- // Fields //------------------------------- warunfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Rachel Field 1",drunfild1, "Rachel Field 2",drunfild2, "Rachel Field 3",drunfild3, "Rachel Field 4",drunfild4, "Rachel Field 5",drunfild5, "Rachel Field 6",drunfild6, "Rachel Field 7",drunfild7, "Rachel Field 8",drunfild8, "Rachel Field 9",drunfild9, "Rachel Field 10",drunfild10, "Rachel Field 11",drunfild11, "Rachel Field 12",drunfild12, "Rachel Field 13",drunfild13; wgeffild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Geffen Field 0",dgeffild00, "Geffen Field 1",dgeffild01, "Geffen Field 2",dgeffild02, "Geffen Field 3",dgeffild03, "Geffen Field 4",dgeffild04, "Geffen Field 5",dgeffild05, "Geffen Field 6",dgeffild06, "Geffen Field 7",dgeffild07, "Geffen Field 8",dgeffild08, "Geffen Field 9",dgeffild09, "Geffen Field 10",dgeffild10, "Geffen Field 11",dgeffild11, "Geffen Field 12",dgeffild12, "Geffen Field 13",dgeffild13, "Geffen Field 14",dgeffild14; wmjolnir: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Mjolnir Field 1",dmjolnir1, "Mjolnir Field 2",dmjolnir2, "Mjolnir Field 3",dmjolnir3, "Mjolnir Field 4",dmjolnir4, "Mjolnir Field 5",dmjolnir5, "Mjolnir Field 6",dmjolnir6, "Mjolnir Field 7",dmjolnir7, "Mjolnir Field 8",dmjolnir8, "Mjolnir Field 9",dmjolnir9, "Mjolnir Field 10",dmjolnir10, "Mjolnir Field 11",dmjolnir11, "Mjolnir Field 12",dmjolnir12; wmosc: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Moscovia Field 1",dmosc1, "Moscovia Field 2",dmosc2; wmocfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Sograt Desert 1",dmocfild1, "Sograt Desert 2",dmocfild2, "Sograt Desert 3",dmocfild3, "Sograt Desert 4",dmocfild4, "Sograt Desert 5",dmocfild5, "Sograt Desert 6",dmocfild6, "Sograt Desert 7",dmocfild7, "Sograt Desert 8",dmocfild8, "Sograt Desert 9",dmocfild9, "Sograt Desert 10",dmocfild10, "Sograt Desert 11",dmocfild11, "Sograt Desert 12",dmocfild12, "Sograt Desert 13",dmocfild13, "Sograt Desert 14",dmocfild14, "Sograt Desert 15",dmocfild15, "Sograt Desert 16",dmocfild16, "Sograt Desert 17",dmocfild17, "Sograt Desert 18",dmocfild18, "Sograt Desert 19",dmocfild19; wpayfor: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Payon Forest 1",dpayfild1, "Payon Forest 2",dpayfild2, "Payon Forest 3",dpayfild3, "Payon Forest 4",dpayfild4, "Payon Forest 5",dpayfild5, "Payon Forest 6",dpayfild6, "Payon Forest 7",dpayfild7, "Payon Forest 8",dpayfild8, "Payon Forest 9",dpayfild9, "Payon Forest 10",dpayfild10, "Payon Forest 11",dpayfild11; wprtfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Prontera Field 1",dprtfild1, "Prontera Field 2",dprtfild2, "Prontera Field 3",dprtfild3, "Prontera Field 4",dprtfild4, "Prontera Field 5",dprtfild5, "Prontera Field 6",dprtfild6, "Prontera Field 7",dprtfild7, "Prontera Field 8",dprtfild8, "Prontera Field 9",dprtfild9, "Prontera Field 10",dprtfild10, "Prontera Field 11",dprtfild11; wxmasfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Lutie Field 1",dxmasfild1; wcmdfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Comodo Field 1",dcmdfild1, "Comodo Field 2",dcmdfild2, "Comodo Field 3",dcmdfild3, "Comodo Field 4",dcmdfild4, "Comodo Field 5",dcmdfild5, "Comodo Field 6",dcmdfild6, "Comodo Field 7",dcmdfild7, "Comodo Field 8",dcmdfild8, "Comodo Field 9",dcmdfild9; wyunofild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Yuno Field 1",dyunofild1, "Yuno Field 2",dyunofild2, "Yuno Field 3",dyunofild3, "Yuno Field 4",dyunofild4, "Yuno Field 5",dyunofild5, "Yuno Field 6",dyunofild6, "Yuno Field 7",dyunofild7, "Yuno Field 8",dyunofild8, "Yuno Field 9",dyunofild9, "Yuno Field 10",dyunofild10, "Yuno Field 11",dyunofild11, "Yuno Field 12",dyunofild12; wamafild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Amatsu Field 1",damafild1; wgonfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Gonryun Field 1",dgonfild1; wumfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Umbala Field 1",dumfild1, "Umbala Field 2",dumfild2, "Umbala Field 3",dumfild3, "Umbala Field 4",dumfild4; wniffild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Niflheim Field 1",dniffild1, "Niflheim Field 2",dniffild2; wodint: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Odin Temple 1",wodtemp1, "Odin Temple 2",wodtemp2, "Odin Temple 3",wodtemp3; wloufild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Louyang Field 1",dloufild1; wayofild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Ayothaya Field 1",dayofild1, "Ayothaya Field 2",dayofild2; weinfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Einbroch Field 1",deinfild1, "Einbroch Field 2",deinfild2, "Einbroch Field 3",deinfild3, "Einbroch Field 4",deinfild4, "Einbroch Field 5",deinfild5, "Einbroch Field 6",deinfild6, "Einbroch Field 7",deinfild7, "Einbroch Field 8",deinfild8, "Einbroch Field 9",deinfild9, "Einbroch Field 10",deinfild10; wlhzfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Lighthalzen Field 1",dlhzfild1, "Lighthalzen Field 2",dlhzfild2, "Lighthalzen Field 3",dlhzfild3; whufild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Hugel Field 1",dhufild1, "Hugel Field 2",dhufild2, "Hugel Field 3",dhufild3, "Hugel Field 4",dhufild4, "Hugel Field 5",dhufild5, "Hugel Field 6",dhufild6, "Hugel Field 7",dhufild7; wveinsfild: mes "[Warp NPC]"; mes "Please select a Field. You will be warped to the center of that map."; next; menu "Veins Field 1",dvfild1, "Veins Field 2",dvfild2, "Veins Field 3",dvfild3, "Veins Field 4",dvfild4, "Veins Field 5",dvfild5, "Veins Field 6",dvfild6, "Veins Field 7",dvfild7; //------------------------------- // Dungeons //------------------------------- wjuper: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",djuperos1, "Level 2",djuperos3, "Core",djuperos2; wumdun: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Carpenter's Shop in the Tree",dumdun1, "Passage to a Foreign World",dumdun2, "Hvergermil's Fountain",dyggdrasil1; wloudun: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "The Royal Tomb",dloudun1, "Inside the Royal Tomb",dloudun2, "Suei Long Gon",dloudun3; wayodun: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Ancient Shrine Maze",dayodun1, "Inside Ancient Shrine",dayodun2; weindun: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",deindun1, "Level 2",deindun2; wlhzdun: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dlhzdun1, "Level 2",dlhzdun2, "Level 3",dlhzdun3; wabyss: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dabyss1, "Level 2",dabyss2, "Level 3",dabyss3; wthat: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dthat1, "Level 2",dthat2, "Level 3",dthat3, "Level 4",dthat4, "Level 5",dthat5, "Level 6",dthat6, "Level 7",dthat7, "Level 8",dthat8, "Level 9",dthat9, "Level 10",dthat10, "Level 11",dthat11, "Level 12",dthat12; wkieldun: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dkieldun1, "Level 2",dkieldun2; ant: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",danthell1, "Level 2",danthell2; beach: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dbeach1, "Level 2",dbeach2, "Level 3",dbeach3; byalan: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dbyalan1, "Level 2",dbyalan2, "Level 3",dbyalan3, "Level 4",dbyalan4, "Level 5",dbyalan5; clock: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dclock1, "Level 2",dclock2, "Level 3",dclock3, "Level 4",dclock4, "Basement 1",dalde1, "Basement 2",dalde2, "Basement 3",dalde3, "Basement 4",dalde4; coal: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dcoal1, "Level 2",dcoal2, "Level 3",dcoal3; culvert: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dculvert1, "Level 2",dculvert2, "Level 3",dculvert3, "Level 4",dculvert4; geffen: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dgeffen1, "Level 2",dgeffen2, "Level 3",dgeffen3, "Level 4",dgeffen4; glast: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Entrance",dglastent, "Castle 1",dglastcast1, "Castle 2",dglastcast2, "Chivalry 1",dglastchiv1, "Chivalry 2",dglastchiv2, "Churchyard",dglastyard, "Culvert 1",dglastcul1, "Culvert 2",dglastcul1, "Culvert 3",dglastcul3, "Culvert 4",dglastcul4, "St.Abbey",dglastchur, "Staircase Dungeon",dglaststep, "Underground Cave 1",dglastcave1, "Underground Cave 2",dglastcave2, "Underground Prison 1",dglastpris1, "Underground Prison 2",dglastpris2; hidden: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dhidden1, "Level 2",dhidden2, "Level 3",dhidden3; iced: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",diced1, "Level 2",diced2, "Level 3",diced3, "Level 4",diced4; magma: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dmagma1, "Level 2",dmagma2; wmosk: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dmosk1, "Level 2",dmosk2, "Level 3",dmosk3; orc: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dorc1, "Level 2",dorc2; payon: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dpayon1, "Level 2",dpayon2, "Level 3",dpayon3, "Level 4",dpayon4, "Level 5",dpayon5; pyramids: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dpyramids1, "Level 2",dpyramids2, "Level 3",dpyramids3, "Level 4",dpyramids4, "Basement 1",dpyramidsb1, "Basement 2",dpyramidsb2; sphinx: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dsphinx1, "Level 2",dsphinx2, "Level 3",dsphinx3, "Level 4",dsphinx4, "Level 5",dsphinx5; sunken: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dsunken1, "Level 2",dsunken2; toy: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dtoy1, "Level 2",dtoy2; turtle: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Entrance",dturtleent, "Level 1",dturtle1, "Level 2",dturtle2, "Level 3",dturtle3; ama: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dama1, "Level 2",dama2, "Level 3",dama3; gon: mes "[bWarp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dgon1, "Level 2",dgon2, "Level 3",dgon3; gefenia: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dgefenia1, "Level 2",dgefenia2, "Level 3",dgefenia3, "Level 4",dgefenia4; wthor: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dthor1, "Level 2",dthor2, "Level 3",dthor3; rachels: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",drachel1, "Level 2",drachel2, "Level 3",drachel3, "Level 4",drachel4, "Level 5",drachel5; wabbey: mes "[Warp NPC]"; mes "Please select a Level. Beware that you will be warped directly into the dungeon."; next; menu "Level 1",dabbey1, "Level 2",dabbey2, "Level 3",dabbey3; dimen: mes "[Warp NPC]"; mes "Please select a level"; next; menu "Level 1",-,"Level 2",-; if(@menu == 1) { set lastmap$,"moc_fild21"; set lastx,27; set lasty,196; warp "moc_fild21",27,196; end; } if(@menu == 2) { set lastmap$,"moc_fild22"; set lastx,37; set lasty,195; warp "moc_fild22",37,195; end; } //------------------------------- // Town Warps //------------------------------- wafeltz: set lastmap$,"rachel"; set lastx,130; set lasty,111; warp "rachel.gat",130,111; end; walberta: set lastmap$,"alberta"; set lastx,106; set lasty,133; warp "alberta.gat",106,133; end; waldebaran: set lastmap$,"aldebaran"; set lastx,140; set lasty,115; warp "aldebaran.gat",140,115; end; wamatsu: set lastmap$,"amatsu"; set lastx,197; set lasty,89; warp "amatsu.gat",197,89; end; wayot: set lastmap$,"ayothaya"; set lastx,150; set lasty,113; warp "ayothaya.gat",150,113; end; wcomodo: set lastmap$,"comodo"; set lastx,205; set lasty,69; warp "comodo.gat",205,69; end; weinbech: set lastmap$,"einbech"; set lastx,190; set lasty,79; warp "einbech.gat",190,79; end; weinbroch: set lastmap$,"einbroch"; set lastx,178; set lasty,167; warp "einbroch.gat",178,167; end; whugel: set lastmap$,"hugel"; set lastx,94; set lasty,147; warp "hugel.gat",94,147; end; wlighthalzen: set lastmap$,"lighthalzen"; set lastx,159; set lasty,90; warp "lighthalzen.gat",159,90; end; wgonryun: set lastmap$,"gonryun"; set lastx,159; set lasty,117; warp "gonryun.gat",159,117; end; wgeffen: set lastmap$,"geffen"; set lastx,120; set lasty,64; warp "geffen.gat",120,64; end; wizlude: set lastmap$,"izlude"; set lastx,128; set lasty,87; warp "izlude.gat",128,87; end; wxmas: set lastmap$,"xmas"; set lastx,148; set lasty,131; warp "xmas.gat",148,131; end; wjawaii: set lastmap$,"jawaii"; set lastx,213; set lasty,230; warp "jawaii.gat",213,230; end; wmorroc: set lastmap$,"morocc"; set lastx,159; set lasty,91; warp "morocc.gat",159,91; end; wnameless: set lastmap$,"nameless_n"; set lastx,256; set lasty,215; warp "nameless_n.gat",256,215; end; wniflheim: set lastmap$,"niflheim"; set lastx,85; set lasty,154; warp "niflheim.gat",85,154; end; wpayon: set lastmap$,"payon"; set lastx,156; set lasty,223; warp "payon.gat",156,223; end; wprontera: set lastmap$,"prontera"; set lastx,156; set lasty,183; warp "prontera.gat",156,183; end; wyuno: set lastmap$,"yuno"; set lastx,157; set lasty,165; warp "yuno.gat",157,165; end; wumbala: set lastmap$,"umbala"; set lastx,100; set lasty,159; warp "umbala.gat",100,159; end; wlouyang: set lastmap$,"louyang"; set lastx,218; set lasty,115; warp "louyang.gat",218,115; end; wthorcamp: set lastmap$,"thor_camp"; set lastx,254; set lasty,90; warp "thor_camp.gat",254,90; end; wveins: set lastmap$,"veins"; set lastx,215; set lasty,122; warp "veins.gat",215,122; end; wevol: set lastmap$,"Evolution"; set lastx,88; set lasty,127; warp "mornanie.gat",88,127; end; //------------------------------- // Dungeon Warps //------------------------------- dkieldun1: set lastmap$,"kh_dun01"; set lastx,28; set lasty,226; warp "kh_dun01.gat",28,226; end; dkieldun2: set lastmap$,"kh_dun02"; set lastx,41; set lasty,198; warp "kh_dun02.gat",41,198; end; djuperos1: set lastmap$,"juperos_01"; set lastx,53; set lasty,247; warp "juperos_01.gat",53,247; end; djuperos3: set lastmap$,"juperos_02"; set lastx,37; set lasty,63; warp "juperos_02.gat",37,63; end; djuperos2: set lastmap$,"jupe_core"; set lastx,150; set lasty,285; warp "jupe_core.gat",150,285; end; dumdun1: set lastmap$,"um_dun01"; set lastx,42; set lasty,31; warp "um_dun01.gat",42,31; end; dumdun2: set lastmap$,"um_dun02"; set lastx,51; set lasty,25; warp "um_dun02.gat",51,25; end; dloudun1: set lastmap$,"lou_dun01"; set lastx,218; set lasty,196; warp "lou_dun01.gat",218,196; end; dloudun2: set lastmap$,"lou_dun02"; set lastx,282; set lasty,20; warp "lou_dun02.gat",282,20; end; dloudun3: set lastmap$,"lou_dun03"; set lastx,165; set lasty,38; warp "lou_dun03.gat",165,38; end; dayodun1: set lastmap$,"ayo_dun01"; set lastx,275; set lasty,19; warp "ayo_dun01.gat",275,19; end; dayodun2: set lastmap$,"ayo_dun02"; set lastx,24; set lasty,26; warp "ayo_dun02.gat",24,26; end; deindun1: set lastmap$,"ein_dun01"; set lastx,22; set lasty,14; warp "ein_dun01.gat",22,14; end; deindun2: set lastmap$,"ein_dun02"; set lastx,292; set lasty,290; warp "ein_dun02.gat",292,290; end; dlhzdun1: set lastmap$,"lhz_dun01"; set lastx,150; set lasty,228; warp "lhz_dun01.gat",150,228; end; dlhzdun2: set lastmap$,"lhz_dun02"; set lastx,150; set lasty,18; warp "lhz_dun02.gat",150,18; end; dlhzdun3: set lastmap$,"lhz_dun03"; set lastx,140; set lasty,133; warp "lhz_dun03.gat",140,133; end; dabyss1: set lastmap$,"abyss_01"; set lastx,192; set lasty,207; warp "abyss_01.gat",264,272; end; dabyss2: set lastmap$,"abyss_02"; set lastx,275; set lasty,270; warp "abyss_02.gat",275,270; end; dabyss3: set lastmap$,"abyss_03"; set lastx,116; set lasty,28; warp "abyss_03.gat",116,28; end; dthat1: set lastmap$,"tha_t01"; set lastx,150; set lasty,39; warp "tha_t01.gat",150,39; end; dthat2: set lastmap$,"tha_t02"; set lastx,150; set lasty,136; warp "tha_t02.gat",150,136; end; dthat3: set lastmap$,"tha_t03"; set lastx,220; set lasty,158; warp "tha_t03.gat",220,158; end; dthat4: set lastmap$,"tha_t04"; set lastx,59; set lasty,143; warp "tha_t04.gat",59,143; end; dthat5: set lastmap$,"tha_t05"; set lastx,62; set lasty,11; warp "tha_t05.gat",62,11; end; dthat6: set lastmap$,"tha_t06"; set lastx,89; set lasty,221; warp "tha_t06.gat",89,221; end; dthat7: set lastmap$,"tha_t07"; set lastx,35; set lasty,166; warp "tha_t07.gat",35,166; end; dthat8: set lastmap$,"tha_t08"; set lastx,93; set lasty,148; warp "tha_t08.gat",93,148; end; dthat9: set lastmap$,"tha_t09"; set lastx,29; set lasty,107; warp "tha_t09.gat",29,107; end; dthat10: set lastmap$,"tha_t10"; set lastx,159; set lasty,138; warp "tha_t10.gat",159,138; end; dthat11: set lastmap$,"tha_t11"; set lastx,19; set lasty,20; warp "tha_t11.gat",19,20; end; dthat12: set lastmap$,"tha_t12"; set lastx,130; set lasty,52; warp "tha_t12.gat",130,52; end; danthell1: set lastmap$,"anthell01"; set lastx,35; set lasty,262; warp "anthell01.gat",35,262; end; danthell2: set lastmap$,"anthell02"; set lastx,168; set lasty,170; warp "anthell02.gat",168,170; end; dbeach1: set lastmap$,"beach_dun"; set lastx,266; set lasty,67; warp "beach_dun.gat",266,67; end; dbeach2: set lastmap$,"beach_dun2"; set lastx,255; set lasty,244; warp "beach_dun2.gat",255,244; end; dbeach3: set lastmap$,"beach_dun3"; set lastx,23; set lasty,260; warp "beach_dun3.gat",23,260; end; dbyalan1: set lastmap$,"iz_dun00"; set lastx,168; set lasty,168; warp "iz_dun00.gat",168,168; end; dbyalan2: set lastmap$,"iz_dun01"; set lastx,253; set lasty,252; warp "iz_dun01.gat",253,252; end; dbyalan3: set lastmap$,"iz_dun02"; set lastx,236; set lasty,204; warp "iz_dun02.gat",236,204; end; dbyalan4: set lastmap$,"iz_dun03"; set lastx,32; set lasty,63; warp "iz_dun03.gat",32,63; end; dbyalan5: set lastmap$,"iz_dun04"; set lastx,26; set lasty,27; warp "iz_dun04.gat",26,27; end; dalde1: set lastmap$,"alde_dun01"; set lastx,297; set lasty,25; warp "alde_dun01.gat",297,25; end; dalde2: set lastmap$,"alde_dun02"; set lastx,127; set lasty,169; warp "alde_dun02.gat",127,169; end; dalde3: set lastmap$,"alde_dun03"; set lastx,277; set lasty,178; warp "alde_dun03.gat",277,178; end; dalde4: set lastmap$,"alde_dun04"; set lastx,268; set lasty,74; warp "alde_dun04.gat",268,74; end; dclock1: set lastmap$,"c_tower1"; set lastx,199; set lasty,159; warp "c_tower1.gat",199,159; end; dclock2: set lastmap$,"c_tower2"; set lastx,148; set lasty,283; warp "c_tower2.gat",148,283; end; dclock3: set lastmap$,"c_tower3"; set lastx,65; set lasty,147; warp "c_tower3.gat",65,147; end; dclock4: set lastmap$,"c_tower4"; set lastx,56; set lasty,155; warp "c_tower4.gat",56,155; end; dcoal1: set lastmap$,"mjo_dun01"; set lastx,52; set lasty,17; warp "mjo_dun01.gat",52,17; end; dcoal2: set lastmap$,"mjo_dun02"; set lastx,381; set lasty,343; warp "mjo_dun02.gat",381,343; end; dcoal3: set lastmap$,"mjo_dun03"; set lastx,302; set lasty,262; warp "mjo_dun03.gat",302,262; end; dculvert1: set lastmap$,"prt_sewb1"; set lastx,131; set lasty,247; warp "prt_sewb1.gat",131,247; end; dculvert2: set lastmap$,"prt_sewb2"; set lastx,19; set lasty,19; warp "prt_sewb2.gat",19,19; end; dculvert3: set lastmap$,"prt_sewb3"; set lastx,180; set lasty,169; warp "prt_sewb3.gat",180,169; end; dculvert4: set lastmap$,"prt_sewb4"; set lastx,100; set lasty,92; warp "prt_sewb4.gat",100,92; end; dgeffen1: set lastmap$,"gef_dun00"; set lastx,104; set lasty,99; warp "gef_dun00.gat",104,99; end; dgeffen2: set lastmap$,"gef_dun01"; set lastx,115; set lasty,236; warp "gef_dun01.gat",115,236; end; dgeffen3: set lastmap$,"gef_dun02"; set lastx,106; set lasty,132; warp "gef_dun02.gat",106,132; end; dgeffen4: set lastmap$,"gef_dun03"; set lastx,203; set lasty,200; warp "gef_dun03.gat",203,200; end; dglastent: set lastmap$,"glast_01"; set lastx,370; set lasty,304; warp "glast_01.gat",370,304; end; dglastcast1: set lastmap$,"gl_cas01"; set lastx,199; set lasty,29; warp "gl_cas01.gat",199,29; end; dglastcast2: set lastmap$,"gl_cas02"; set lastx,104; set lasty,25; warp "gl_cas02.gat",104,25; end; dglastchiv1: set lastmap$,"gl_knt01"; set lastx,150; set lasty,15; warp "gl_knt01.gat",150,15; end; dglastchiv2: set lastmap$,"gl_knt02"; set lastx,157; set lasty,287; warp "gl_knt02.gat",157,287; end; dglastyard: set lastmap$,"gl_chyard"; set lastx,147; set lasty,15; warp "gl_chyard.gat",147,15; end; dglastcul1: set lastmap$,"gl_sew01"; set lastx,258; set lasty,255; warp "gl_sew01.gat",258,255; end; dglastcul2: set lastmap$,"gl_sew02"; set lastx,108; set lasty,291; warp "gl_sew02.gat",108,291; end; dglastcul3: set lastmap$,"gl_sew03"; set lastx,171; set lasty,283; warp "gl_sew03.gat",171,283; end; dglastcul4: set lastmap$,"gl_sew04"; set lastx,68; set lasty,277; warp "gl_sew04.gat",68,277; end; dglastchur: set lastmap$,"gl_church"; set lastx,156; set lasty,7; warp "gl_church.gat",156,7; end; dglaststep: set lastmap$,"gl_step"; set lastx,12; set lasty,7; warp "gl_step.gat",12,7; end; dglastcave1: set lastmap$,"gl_dun01"; set lastx,133; set lasty,271; warp "gl_dun01.gat",133,271; end; dglastcave2: set lastmap$,"gl_dun02"; set lastx,224; set lasty,274; warp "gl_dun02.gat",224,274; end; dglastpris1: set lastmap$,"gl_prison"; set lastx,14; set lasty,70; warp "gl_prison.gat",14,70; end; dglastpris2: set lastmap$,"gl_prison1"; set lastx,150; set lasty,14; warp "gl_prison1.gat",150,14; end; dhidden1: set lastmap$,"prt_maze01"; set lastx,176; set lasty,7; warp "prt_maze01.gat",176,7; end; dhidden2: set lastmap$,"prt_maze02"; set lastx,94; set lasty,9; warp "prt_maze02.gat",93,20; end; dhidden3: set lastmap$,"prt_maze03"; set lastx,23; set lasty,8; warp "prt_maze03.gat",23,8; end; diced1: set lastmap$,"ice_dun01"; set lastx,157; set lasty,14; warp "ice_dun01.gat",157,14; end; diced2: set lastmap$,"ice_dun02"; set lastx,151; set lasty,155; warp "ice_dun02.gat",151,155; end; diced3: set lastmap$,"ice_dun03"; set lastx,149; set lasty,22; warp "ice_dun03.gat",149,22; end; diced4: set lastmap$,"ice_dun04"; set lastx,33; set lasty,158; warp "ice_dun04.gat",33,158; end; dmagma1: set lastmap$,"mag_dun01"; set lastx,126; set lasty,68; warp "mag_dun01.gat",126,68; end; dmagma2: set lastmap$,"mag_dun02"; set lastx,47; set lasty,30; warp "mag_dun02.gat",47,30; end; dmosk1: set lastmap$,"mosk_dun01"; set lastx,189; set lasty,46; warp "mosk_dun01.gat",189,46; end; dmosk2: set lastmap$,"mosk_dun02"; set lastx,163; set lasty,33; warp "mosk_dun02.gat",163,33; end; dmosk3: set lastmap$,"mosk_dun03"; set lastx,33; set lasty,136; warp "mosk_dun03.gat",33,136; end; dorc1: set lastmap$,"orcsdun01"; set lastx,32; set lasty,170; warp "orcsdun01.gat",32,170; end; dorc2: set lastmap$,"orcsdun02"; set lastx,21; set lasty,185; warp "orcsdun02.gat",21,185; end; dpayon1: set lastmap$,"pay_dun00"; set lastx,21; set lasty,183; warp "pay_dun00.gat",21,183; end; dpayon2: set lastmap$,"pay_dun01"; set lastx,19; set lasty,33; warp "pay_dun01.gat",19,33; end; dpayon3: set lastmap$,"pay_dun02"; set lastx,19; set lasty,63; warp "pay_dun02.gat",19,63; end; dpayon4: set lastmap$,"pay_dun03"; set lastx,155; set lasty,159; warp "pay_dun03.gat",155,159; end; dpayon5: set lastmap$,"pay_dun04"; set lastx,201; set lasty,204; warp "pay_dun04.gat",201,204; end; dpyramids1: set lastmap$,"moc_pryd01"; set lastx,192; set lasty,9; warp "moc_pryd01.gat",192,9; end; dpyramids2: set lastmap$,"moc_pryd02"; set lastx,10; set lasty,192; warp "moc_pryd02.gat",10,192; end; dpyramids3: set lastmap$,"moc_pryd03"; set lastx,100; set lasty,92; warp "moc_pryd03.gat",100,92; end; dpyramids4: set lastmap$,"moc_pryd04"; set lastx,181; set lasty,11; warp "moc_pryd04.gat",181,11; end; dpyramidsb1: set lastmap$,"moc_pryd05"; set lastx,94; set lasty,96; warp "moc_pryd05.gat",94,96; end; dpyramidsb2: set lastmap$,"moc_pryd06"; set lastx,192; set lasty,8; warp "moc_pryd06.gat",192,8; end; dsphinx1: set lastmap$,"in_sphinx1"; set lastx,288; set lasty,9; warp "in_sphinx1.gat",288,9; end; dsphinx2: set lastmap$,"in_sphinx2"; set lastx,149; set lasty,81; warp "in_sphinx2.gat",149,81; end; dsphinx3: set lastmap$,"in_sphinx3"; set lastx,210; set lasty,54; warp "in_sphinx3.gat",210,54; end; dsphinx4: set lastmap$,"in_sphinx4"; set lastx,10; set lasty,222; warp "in_sphinx4.gat",10,222; end; dsphinx5: set lastmap$,"in_sphinx5"; set lastx,100; set lasty,99; warp "in_sphinx5.gat",100,99; end; dsunken1: set lastmap$,"treasure01"; set lastx,69; set lasty,24; warp "treasure01.gat",69,24; end; dsunken2: set lastmap$,"treasure02"; set lastx,102; set lasty,27; warp "treasure02.gat",102,27; end; dtoy1: set lastmap$,"xmas_dun01"; set lastx,205; set lasty,15; warp "xmas_dun01.gat",205,15; end; dtoy2: set lastmap$,"xmas_dun02"; set lastx,129; set lasty,133; warp "xmas_dun02.gat",129,133; end; dturtleent: set lastmap$,"tur_dun01"; set lastx,154; set lasty,49; warp "tur_dun01.gat",154,49; end; dturtle1: set lastmap$,"tur_dun02"; set lastx,148; set lasty,261; warp "tur_dun02.gat",148,261; end; dturtle2: set lastmap$,"tur_dun03"; set lastx,132; set lasty,189; warp "tur_dun03.gat",132,189; end; dturtle3: set lastmap$,"tur_dun04"; set lastx,100; set lasty,192; warp "tur_dun04.gat",100,192; end; dama1: set lastmap$,"ama_dun01"; set lastx,228; set lasty,11; warp "ama_dun01.gat",228,11; end; dama2: set lastmap$,"ama_dun02"; set lastx,34; set lasty,41; warp "ama_dun02.gat",34,41; end; dama3: set lastmap$,"ama_dun03"; set lastx,119; set lasty,14; warp "ama_dun03.gat",119,14; end; dgon1: set lastmap$,"gon_dun01"; set lastx,153; set lasty,53; warp "gon_dun01.gat",153,53; end; dgon2: set lastmap$,"gon_dun02"; set lastx,28; set lasty,113; warp "gon_dun02.gat",28,113; end; dgon3: set lastmap$,"gon_dun03"; set lastx,68; set lasty,16; warp "gon_dun03.gat",68,16; end; dgefenia1: set lastmap$,"gefenia01"; set lastx,40; set lasty,103; warp "gefenia01.gat",40,103; end; dgefenia2: set lastmap$,"gefenia02"; set lastx,203; set lasty,34; warp "gefenia02.gat",203,34; end; dgefenia3: set lastmap$,"gefenia03"; set lastx,266; set lasty,168; warp "gefenia03.gat",266,168; end; dgefenia4: set lastmap$,"gefenia04"; set lastx,130; set lasty,272; warp "gefenia04.gat",130,272; end; dgldun1: set lastmap$,"gld_dun01"; set lastx,119; set lasty,93; warp "gld_dun01.gat",119,93; end; dgldun2: set lastmap$,"gld_dun02"; set lastx,39; set lasty,161; warp "gld_dun02.gat",39,161; end; dgldun3: set lastmap$,"gld_dun03"; set lastx,50; set lasty,44; warp "gld_dun03.gat",50,44; end; dgldun4: set lastmap$,"gld_dun04"; set lastx,116; set lasty,45; warp "gld_dun04.gat",116,45; end; casino: set lastmap$,"cmd_in02"; set lastx,179; set lasty,129; warp "cmd_in02.gat",179,129; end; dthor1: set lastmap$,"thor_v01"; set lastx,21; set lasty,228; warp "thor_v01.gat",21,228; end; dthor2: set lastmap$,"thor_v02"; set lastx,75; set lasty,205; warp "thor_v02.gat",75,205; end; dthor3: set lastmap$,"thor_v03"; set lastx,34; set lasty,272; warp "thor_v03.gat",34,272; end; drachel1: set lastmap$,"ra_san01"; set lastx,140; set lasty,11; warp "ra_san01.gat",140,11; end; drachel2: set lastmap$,"ra_san02"; set lastx,32; set lasty,21; warp "ra_san02.gat",32,21; end; drachel3: set lastmap$,"ra_san03"; set lastx,10; set lasty,149; warp "ra_san03.gat",10,149; end; drachel4: set lastmap$,"ra_san04"; set lastx,204; set lasty,218; warp "ra_san04.gat",204,218; end; drachel5: set lastmap$,"ra_san05"; set lastx,150; set lasty,9; warp "ra_san05.gat",150,9; end; dabbey1: set lastmap$,"abbey01"; set lastx,51; set lasty,14; warp "abbey01.gat",51,14; end; dabbey2: set lastmap$,"abbey02"; set lastx,150; set lasty,11; warp "abbey02.gat",150,11; end; dabbey3: set lastmap$,"abbey03"; set lastx,120; set lasty,10; warp "abbey03.gat",120,10; end; //------------------------------- // Field Warps //------------------------------- drunfild1: set lastmap$,"ra_fild01"; set lastx,192; set lasty,162; warp "ra_fild01.gat",192,162; end; drunfild2: set lastmap$,"ra_fild02"; set lastx,235; set lasty,166; warp "ra_fild02.gat",235,166; end; drunfild3: set lastmap$,"ra_fild03"; set lastx,202; set lasty,206; warp "ra_fild03.gat",202,206; end; drunfild4: set lastmap$,"ra_fild04"; set lastx,202; set lasty,208; warp "ra_fild04.gat",202,208; end; drunfild5: set lastmap$,"ra_fild05"; set lastx,225; set lasty,202; warp "ra_fild05.gat",225,202; end; drunfild6: set lastmap$,"ra_fild06"; set lastx,202; set lasty,214; warp "ra_fild06.gat",202,214; end; drunfild7: set lastmap$,"ra_fild07"; set lastx,263; set lasty,196; warp "ra_fild07.gat",263,196; end; drunfild8: set lastmap$,"ra_fild08"; set lastx,217; set lasty,201; warp "ra_fild08.gat",217,201; end; drunfild9: set lastmap$,"ra_fild09"; set lastx,87; set lasty,121; warp "ra_fild09.gat",87,121; end; drunfild10: set lastmap$,"ra_fild10"; set lastx,277; set lasty,181; warp "ra_fild10.gat",277,181; end; drunfild11: set lastmap$,"ra_fild11"; set lastx,221; set lasty,185; warp "ra_fild11.gat",221,185; end; drunfild12: set lastmap$,"ra_fild12"; set lastx,175; set lasty,200; warp "ra_fild12.gat",175,200; end; drunfild13: set lastmap$,"ra_fild13"; set lastx,174; set lasty,197; warp "ra_fild13.gat",174,197; end; dgeffild00: set lastmap$,"gef_fild00"; set lastx,46; set lasty,199; warp "gef_fild00.gat",46,199; end; dgeffild01: set lastmap$,"gef_fild01"; set lastx,213; set lasty,204; warp "gef_fild01.gat",213,204; end; dgeffild02: set lastmap$,"gef_fild02"; set lastx,195; set lasty,212; warp "gef_fild02.gat",195,212; end; dgeffild03: set lastmap$,"gef_fild03"; set lastx,257; set lasty,192; warp "gef_fild03.gat",257,192; end; dgeffild04: set lastmap$,"gef_fild04"; set lastx,188; set lasty,171; warp "gef_fild04.gat",188,171; end; dgeffild05: set lastmap$,"gef_fild05"; set lastx,166; set lasty,263; warp "gef_fild05.gat",166,263; end; dgeffild06: set lastmap$,"gef_fild06"; set lastx,248; set lasty,158; warp "gef_fild06.gat",248,158; end; dgeffild07: set lastmap$,"gef_fild07"; set lastx,195; set lasty,191; warp "gef_fild07.gat",195,191; end; dgeffild08: set lastmap$,"gef_fild08"; set lastx,186; set lasty,183; warp "gef_fild08.gat",186,183; end; dgeffild09: set lastmap$,"gef_fild09"; set lastx,221; set lasty,117; warp "gef_fild09.gat",221,117; end; dgeffild10: set lastmap$,"gef_fild10"; set lastx,178; set lasty,218; warp "gef_fild10.gat",178,218; end; dgeffild11: set lastmap$,"gef_fild11"; set lastx,136; set lasty,328; warp "gef_fild11.gat",136,328; end; dgeffild12: set lastmap$,"gef_fild12"; set lastx,240; set lasty,181; warp "gef_fild12.gat",240,181; end; dgeffild13: set lastmap$,"gef_fild13"; set lastx,235; set lasty,235; warp "gef_fild13.gat",235,235; end; dgeffild14: set lastmap$,"gef_fild14"; set lastx,211; set lasty,185; warp "gef_fild14.gat",211,185; end; dmjolnir1: set lastmap$,"mjolnir_01"; set lastx,204; set lasty,120; warp "mjolnir_01.gat",204,120; end; dmjolnir2: set lastmap$,"mjolnir_02"; set lastx,175; set lasty,193; warp "mjolnir_02.gat",175,193; end; dmjolnir3: set lastmap$,"mjolnir_03"; set lastx,208; set lasty,213; warp "mjolnir_03.gat",208,213; end; dmjolnir4: set lastmap$,"mjolnir_04"; set lastx,179; set lasty,180; warp "mjolnir_04.gat",179,180; end; dmjolnir5: set lastmap$,"mjolnir_05"; set lastx,181; set lasty,240; warp "mjolnir_05.gat",181,240; end; dmjolnir6: set lastmap$,"mjolnir_06"; set lastx,195; set lasty,270; warp "mjolnir_06.gat",195,270; end; dmjolnir7: set lastmap$,"mjolnir_07"; set lastx,235; set lasty,202; warp "mjolnir_07.gat",235,202; end; dmjolnir8: set lastmap$,"mjolnir_08"; set lastx,188; set lasty,215; warp "mjolnir_08.gat",188,215; end; dmjolnir9: set lastmap$,"mjolnir_09"; set lastx,205; set lasty,144; warp "mjolnir_09.gat",205,144; end; dmjolnir10: set lastmap$,"mjolnir_10"; set lastx,245; set lasty,223; warp "mjolnir_10.gat",245,223; end; dmjolnir11: set lastmap$,"mjolnir_11"; set lastx,180; set lasty,206; warp "mjolnir_11.gat",180,206; end; dmjolnir12: set lastmap$,"mjolnir_12"; set lastx,196; set lasty,208; warp "mjolnir_12.gat",196,208; end; dmosc1: set lastmap$,"mosk_fild01"; set lastx,99; set lasty,105; warp "mosk_fild01.gat",99,105; end; dmosc2: set lastmap$,"mosk_fild02"; set lastx,204; set lasty,59; warp "mosk_fild02.gat",204,59; end; dmocfild1: set lastmap$,"moc_fild01"; set lastx,219; set lasty,205; warp "moc_fild01.gat",219,205; end; dmocfild2: set lastmap$,"moc_fild02"; set lastx,177; set lasty,206; warp "moc_fild02.gat",177,206; end; dmocfild3: set lastmap$,"moc_fild03"; set lastx,194; set lasty,182; warp "moc_fild03.gat",194,182; end; dmocfild4: set lastmap$,"moc_fild04"; set lastx,184; set lasty,217; warp "moc_fild04.gat",184,217; end; dmocfild5: set lastmap$,"moc_fild05"; set lastx,203; set lasty,213; warp "moc_fild05.gat",203,213; end; dmocfild6: set lastmap$,"moc_fild06"; set lastx,213; set lasty,208; warp "moc_fild06.gat",213,208; end; dmocfild7: set lastmap$,"moc_fild07"; set lastx,224; set lasty,170; warp "moc_fild07.gat",224,170; end; dmocfild8: set lastmap$,"moc_fild08"; set lastx,229; set lasty,177; warp "moc_fild08.gat",229,177; end; dmocfild9: set lastmap$,"moc_fild09"; set lastx,195; set lasty,198; warp "moc_fild09.gat",195,198; end; dmocfild10: set lastmap$,"moc_fild10"; set lastx,209; set lasty,168; warp "moc_fild10.gat",209,168; end; dmocfild11: set lastmap$,"moc_fild11"; set lastx,198; set lasty,216; warp "moc_fild11.gat",198,216; end; dmocfild12: set lastmap$,"moc_fild12"; set lastx,156; set lasty,187; warp "moc_fild12.gat",156,187; end; dmocfild13: set lastmap$,"moc_fild13"; set lastx,185; set lasty,263; warp "moc_fild13.gat",185,263; end; dmocfild14: set lastmap$,"moc_fild14"; set lastx,209; set lasty,219; warp "moc_fild14.gat",209,219; end; dmocfild15: set lastmap$,"moc_fild15"; set lastx,223; set lasty,188; warp "moc_fild15.gat",223,188; end; dmocfild16: set lastmap$,"moc_fild16"; set lastx,206; set lasty,228; warp "moc_fild16.gat",206,228; end; dmocfild17: set lastmap$,"moc_fild17"; set lastx,208; set lasty,238; warp "moc_fild17.gat",208,238; end; dmocfild18: set lastmap$,"moc_fild18"; set lastx,209; set lasty,223; warp "moc_fild18.gat",209,223; end; dmocfild19: set lastmap$,"moc_fild19"; set lastx,85; set lasty,97; warp "moc_fild19.gat",85,97; end; dpayfild1: set lastmap$,"pay_fild01"; set lastx,158; set lasty,206; warp "pay_fild01.gat",158,206; end; dpayfild2: set lastmap$,"pay_fild02"; set lastx,151; set lasty,219; warp "pay_fild02.gat",151,219; end; dpayfild3: set lastmap$,"pay_fild03"; set lastx,205; set lasty,148; warp "pay_fild03.gat",205,148; end; dpayfild4: set lastmap$,"pay_fild04"; set lastx,186; set lasty,247; warp "pay_fild04.gat",186,247; end; dpayfild5: set lastmap$,"pay_fild05"; set lastx,134; set lasty,204; warp "pay_fild05.gat",134,204; end; dpayfild6: set lastmap$,"pay_fild06"; set lastx,193; set lasty,235; warp "pay_fild06.gat",193,235; end; dpayfild7: set lastmap$,"pay_fild07"; set lastx,200; set lasty,177; warp "pay_fild07.gat",200,177; end; dpayfild8: set lastmap$,"pay_fild08"; set lastx,137; set lasty,189; warp "pay_fild08.gat",137,189; end; dpayfild9: set lastmap$,"pay_fild09"; set lastx,201; set lasty,224; warp "pay_fild09.gat",201,224; end; dpayfild10: set lastmap$,"pay_fild10"; set lastx,160; set lasty,205; warp "pay_fild10.gat",160,205; end; dpayfild11: set lastmap$,"pay_fild11"; set lastx,194; set lasty,150; warp "pay_fild11.gat",194,150; end; dprtfild0: set lastmap$,"prt_fild00"; set lastx,184; set lasty,235; warp "prt_fild00.gat",184,235; end; dprtfild1: set lastmap$,"prt_fild01"; set lastx,190; set lasty,206; warp "prt_fild01.gat",190,206; end; dprtfild2: set lastmap$,"prt_fild02"; set lastx,240; set lasty,206; warp "prt_fild02.gat",240,206; end; dprtfild3: set lastmap$,"prt_fild03"; set lastx,190; set lasty,143; warp "prt_fild03.gat",190,143; end; dprtfild4: set lastmap$,"prt_fild04"; set lastx,307; set lasty,252; warp "prt_fild04.gat",307,252; end; dprtfild5: set lastmap$,"prt_fild05"; set lastx,239; set lasty,213; warp "prt_fild05.gat",239,213; end; dprtfild6: set lastmap$,"prt_fild06"; set lastx,185; set lasty,188; warp "prt_fild06.gat",185,188; end; dprtfild7: set lastmap$,"prt_fild07"; set lastx,193; set lasty,194; warp "prt_fild07.gat",193,194; end; dprtfild8: set lastmap$,"prt_fild08"; set lastx,187; set lasty,218; warp "prt_fild08.gat",187,218; end; dprtfild9: set lastmap$,"prt_fild09"; set lastx,210; set lasty,183; warp "prt_fild09.gat",210,183; end; dprtfild10: set lastmap$,"prt_fild10"; set lastx,195; set lasty,149; warp "prt_fild10.gat",195,149; end; dprtfild11: set lastmap$,"prt_fild11"; set lastx,198; set lasty,164; warp "prt_fild11.gat",198,164; end; dxmasfild1: set lastmap$,"xmas_fild01"; set lastx,115; set lasty,145; warp "xmas_fild01.gat",115,145; end; dcmdfild1: set lastmap$,"cmd_fild01"; set lastx,180; set lasty,178; warp "cmd_fild01.gat",180,178; end; dcmdfild2: set lastmap$,"cmd_fild02"; set lastx,231; set lasty,160; warp "cmd_fild02.gat",231,160; end; dcmdfild3: set lastmap$,"cmd_fild03"; set lastx,191; set lasty,172; warp "cmd_fild03.gat",191,172; end; dcmdfild4: set lastmap$,"cmd_fild04"; set lastx,228; set lasty,194; warp "cmd_fild04.gat",228,194; end; dcmdfild5: set lastmap$,"cmd_fild05"; set lastx,224; set lasty,203; warp "cmd_fild05.gat",224,203; end; dcmdfild6: set lastmap$,"cmd_fild06"; set lastx,190; set lasty,223; warp "cmd_fild06.gat",190,223; end; dcmdfild7: set lastmap$,"cmd_fild07"; set lastx,234; set lasty,177; warp "cmd_fild07.gat",234,177; end; dcmdfild8: set lastmap$,"cmd_fild08"; set lastx,194; set lasty,175; warp "cmd_fild08.gat",194,175; end; dcmdfild9: set lastmap$,"cmd_fild09"; set lastx,172; set lasty,172; warp "cmd_fild09.gat",172,172; end; dyunofild1: set lastmap$,"yuno_fild01"; set lastx,189; set lasty,224; warp "yuno_fild01.gat",189,224; end; dyunofild2: set lastmap$,"yuno_fild02"; set lastx,192; set lasty,207; warp "yuno_fild02.gat",192,207; end; dyunofild3: set lastmap$,"yuno_fild03"; set lastx,221; set lasty,157; warp "yuno_fild03.gat",221,157; end; dyunofild4: set lastmap$,"yuno_fild04"; set lastx,226; set lasty,199; warp "yuno_fild04.gat",226,199; end; dyunofild5: set lastmap$,"yuno_fild05"; set lastx,223; set lasty,177; warp "yuno_fild05.gat",223,177; end; dyunofild6: set lastmap$,"yuno_fild06"; set lastx,187; set lasty,232; warp "yuno_fild06.gat",187,232; end; dyunofild7: set lastmap$,"yuno_fild07"; set lastx,231; set lasty,174; warp "yuno_fild07.gat",231,174; end; dyunofild8: set lastmap$,"yuno_fild08"; set lastx,196; set lasty,203; warp "yuno_fild08.gat",196,203; end; dyunofild9: set lastmap$,"yuno_fild09"; set lastx,183; set lasty,214; warp "yuno_fild09.gat",183,214; end; dyunofild10: set lastmap$,"yuno_fild10"; set lastx,200; set lasty,124; warp "yuno_fild10.gat",200,124; end; dyunofild11: set lastmap$,"yuno_fild11"; set lastx,195; set lasty,226; warp "yuno_fild11.gat",195,226; end; dyunofild12: set lastmap$,"yuno_fild12"; set lastx,210; set lasty,304; warp "yuno_fild12.gat",210,304; end; damafild1: set lastmap$,"ama_fild01"; set lastx,190; set lasty,197; warp "ama_fild01.gat",190,197; end; dgonfild1: set lastmap$,"gon_fild01"; set lastx,220; set lasty,227; warp "gon_fild01.gat",220,227; end; dumfild1: set lastmap$,"um_fild01"; set lastx,217; set lasty,206; warp "um_fild01.gat",217,206; end; dumfild2: set lastmap$,"um_fild02"; set lastx,223; set lasty,221; warp "um_fild02.gat",223,221; end; dumfild3: set lastmap$,"um_fild03"; set lastx,237; set lasty,215; warp "um_fild03.gat",237,215; end; dumfild4: set lastmap$,"um_fild04"; set lastx,202; set lasty,197; warp "um_fild04.gat",202,197; end; dniffild1: set lastmap$,"nif_fild01"; set lastx,215; set lasty,229; warp "nif_fild01.gat",215,229; end; dniffild2: set lastmap$,"nif_fild02"; set lastx,167; set lasty,234; warp "nif_fild02.gat",167,234; end; dyggdrasil1: set lastmap$,"yggdrasil01"; set lastx,204; set lasty,78; warp "yggdrasil01.gat",204,78; end; dloufild1: set lastmap$,"lou_fild01"; set lastx,229; set lasty,187; warp "lou_fild01.gat",229,187; end; dayofild1: set lastmap$,"ayo_fild01"; set lastx,173; set lasty,134; warp "ayo_fild01.gat",173,134; end; dayofild2: set lastmap$,"ayo_fild02"; set lastx,212; set lasty,150; warp "ayo_fild02.gat",212,150; end; deinfild1: set lastmap$,"ein_fild01"; set lastx,142; set lasty,225; warp "ein_fild01.gat",142,225; end; deinfild2: set lastmap$,"ein_fild02"; set lastx,182; set lasty,141; warp "ein_fild02.gat",182,141; end; deinfild3: set lastmap$,"ein_fild03"; set lastx,187; set lasty,228; warp "ein_fild03.gat",187,228; end; deinfild4: set lastmap$,"ein_fild04"; set lastx,185; set lasty,173; warp "ein_fild04.gat",185,173; end; deinfild5: set lastmap$,"ein_fild05"; set lastx,216; set lasty,173; warp "ein_fild05.gat",216,173; end; deinfild6: set lastmap$,"ein_fild06"; set lastx,195; set lasty,148; warp "ein_fild06.gat",195,148; end; deinfild7: set lastmap$,"ein_fild07"; set lastx,272; set lasty,220; warp "ein_fild07.gat",272,220; end; deinfild8: set lastmap$,"ein_fild08"; set lastx,173; set lasty,214; warp "ein_fild08.gat",173,214; end; deinfild9: set lastmap$,"ein_fild09"; set lastx,207; set lasty,174; warp "ein_fild09.gat",207,174; end; deinfild10: set lastmap$,"ein_fild10"; set lastx,196; set lasty,200; warp "ein_fild10.gat",196,200; end; dlhzfild1: set lastmap$,"lhz_fild01"; set lastx,240; set lasty,179; warp "lhz_fild01.gat",240,179; end; dlhzfild2: set lastmap$,"lhz_fild02"; set lastx,185; set lasty,235; warp "lhz_fild02.gat",185,235; end; dlhzfild3: set lastmap$,"lhz_fild03"; set lastx,240; set lasty,226; warp "lhz_fild03.gat",240,226; end; dhufild1: set lastmap$,"hu_fild01"; set lastx,268; set lasty,101; warp "hu_fild01.gat",268,101; end; dhufild2: set lastmap$,"hu_fild02"; set lastx,222; set lasty,193; warp "hu_fild02.gat",222,193; end; dhufild3: set lastmap$,"hu_fild03"; set lastx,232; set lasty,185; warp "hu_fild03.gat",232,185; end; dhufild4: set lastmap$,"hu_fild04"; set lastx,252; set lasty,189; warp "hu_fild04.gat",252,189; end; dhufild5: set lastmap$,"hu_fild05"; set lastx,196; set lasty,106; warp "hu_fild05.gat",196,106; end; dhufild6: set lastmap$,"hu_fild06"; set lastx,216; set lasty,220; warp "hu_fild06.gat",216,220; end; dhufild7: set lastmap$,"hu_fild07"; set lastx,227; set lasty,197; warp "hu_fild07.gat",227,197; end; wodtemp1: set lastmap$,"odin_tem01"; set lastx,298; set lasty,167; warp "odin_tem01.gat",298,167; end; wodtemp2: set lastmap$,"odin_tem02"; set lastx,224; set lasty,149; warp "odin_tem02.gat",224,149; end; wodtemp3: set lastmap$,"odin_tem03"; set lastx,266; set lasty,280; warp "odin_tem03.gat",266,280; end; dvfild1: set lastmap$,"ve_fild01"; set lastx,186; set lasty,175; warp "ve_fild01.gat",186,175; end; dvfild2: set lastmap$,"ve_fild02"; set lastx,196; set lasty,370; warp "ve_fild02.gat",196,370; end; dvfild3: set lastmap$,"ve_fild03"; set lastx,222; set lasty,45; warp "ve_fild03.gat",222,45; end; dvfild4: set lastmap$,"ve_fild04"; set lastx,51; set lasty,250; warp "ve_fild04.gat",51,250; end; dvfild5: set lastmap$,"ve_fild05"; set lastx,202; set lasty,324; warp "ve_fild05.gat",202,324; end; dvfild6: set lastmap$,"ve_fild06"; set lastx,150; set lasty,223; warp "ve_fild06.gat",150,223; end; dvfild7: set lastmap$,"ve_fild07"; set lastx,149; set lasty,307; warp "ve_fild07.gat",149,307; end; } //--------------------- //Edit duplicates here! //--------------------- rachel.gat,122,148,4 duplicate(Warper) Warper#2-2 721 alberta,110,137,4 duplicate(Warper) Warper#3-1 721 aldebaran,147,117,4 duplicate(Warper) Warper#4-1 721 amatsu,190,86,1 duplicate(Warper) Warper#5-1 721 ayothaya,147,123,6 duplicate(Warper) Warper#6-1 721 comodo,206,77,4 duplicate(Warper) Warper#7-1 721 einbech,196,83,4 duplicate(Warper) Warper#8-1 721 einbroch,182,172,4 duplicate(Warper) Warper#9-1 721 einbroch,243,189,2 duplicate(Warper) Warper#10-1 721 hugel,88,151,5 duplicate(Warper) Warper#11-1 721 lighthalzen,165,94,6 duplicate(Warper) Warper#12-1 721 geffen,116,59,0 duplicate(Warper) Warper#13-1 721 izlude,122,94,3 duplicate(Warper) Warper#14-1 721 xmas,149,136,4 duplicate(Warper) Warper#15-1 721 morocc,156,95,4 duplicate(Warper) Warper#16-1 721 payon,148,228,4 duplicate(Warper) Warper#17-1 721 yuno,160,170,4 duplicate(Warper) Warper#18-1 721 moc_fild04.gat,207,331,4 duplicate(Warper) Warper#19-1 721 izlu2dun.gat,104,82,4 duplicate(Warper) Warper#20-1 721 mjolnir_02.gat,85,363,4 duplicate(Warper) Warper#21-1 721 prt_fild05.gat,273,215,4 duplicate(Warper) Warper#22-1 721 glast_01.gat,370,308,4 duplicate(Warper) Warper#23-1 721 yuno_fild03.gat,37,135,4 duplicate(Warper) Warper#24-1 721 gef_fild10.gat,71,339,4 duplicate(Warper) Warper#25-1 721 pay_arche.gat,39,135,4 duplicate(Warper) Warper#26-1 721 moc_ruins.gat,64,166,4 duplicate(Warper) Warper#27-1 721 moc_fild19.gat,106,97,4 duplicate(Warper) Warper#28-1 721 alb2trea.gat,73,101,4 duplicate(Warper) Warper#29-1 721 tur_dun01.gat,148,239,4 duplicate(Warper) Warper#30-1 721 gonryun,162,122,4 duplicate(Warper) Warper#31-1 721 louyang,221,120,4 duplicate(Warper) Warper#32-1 721 umbala,95,164,4 duplicate(Warper) Warper#33-1 721 moscovia,220,198,4 duplicate(Warper) Warper#34-1 721 veins,217,127,4 duplicate(Warper) Warper#35-1 721 rachel,133,115,4 duplicate(Warper) Warper#36-1 721 mornanie,85,136,4 duplicate(Warper) Warper#37-1 721 mornanie,167,163,4 duplicate(Warper) Warper#38-1 721 market,104,115,4 duplicate(Warper) Warper#39-1 721 quiz_02,162,356,4 duplicate(Warper) Warper#40-1 721
  13. what database are you using?? phpmyadmin or mysql?
  14. its possible but i dont think that it will run 100% with out error in sql because the sql structure of eathena is different with rathena. and some files will be conflict with it. so you need an expert to help you with that. may be i can help you with that
  15. Job: Equippable jobs. Uses the following bitmask table: (S.) Novice (2^00): 0x00000001 Swordman (2^01): 0x00000002 Magician (2^02): 0x00000004 Archer (2^03): 0x00000008 Acolyte (2^04): 0x00000010 Merchant (2^05): 0x00000020 Thief (2^06): 0x00000040 Knight (2^07): 0x00000080 Priest (2^08): 0x00000100 Wizard (2^09): 0x00000200 Blacksmith (2^10): 0x00000400 Hunter (2^11): 0x00000800 Assassin (2^12): 0x00001000 Unused (2^13): 0x00002000 Crusader (2^14): 0x00004000 Monk (2^15): 0x00008000 Sage (2^16): 0x00010000 Rogue (2^17): 0x00020000 Alchemist (2^18): 0x00040000 Bard/Dancer (2^19): 0x00080000 Unused (2^20): 0x00100000 Taekwon (2^21): 0x00200000 Star Gladiator (2^22): 0x00400000 Soul Linker (2^23): 0x00800000 Gunslinger (2^24): 0x01000000 Ninja (2^25): 0x02000000 Gangsi (2^26): 0x04000000 Death Knight (2^27): 0x08000000 Dark Collector (2^28): 0x10000000 Kagerou/Oboro (2^29): 0x20000000 Upper: Equippable upper-types. Uses the following bitmasks: 1: Normal jobs 2: Upper jobs 4: Baby jobs 8: Third jobs Read this carefully and follow in your trunk/doc
  16. emistry how about this?? thanks for help
  17. ok sorry about that but some script are from aerie like battle royal can you please help me?? //______ __________________________ _______ _______ _______ _______ _ _______ //( ___ \( ___ )__ __/\__ __/ \ ( ____ \ ( ____ )( ___ )\ /| ___ ) \ ( ____ \ //| ( ) ) ( ) | ) ( ) ( | ( | ( \/ | ( )|| ( ) | \ / ) ( ) | ( | ( \/ //| (__/ /| (___) | | | | | | | | (__ | (____)|| | | |\ (_) /| (___) | | | (__ //| __ ( | ___ | | | | | | | | __) | __)| | | | \ / | ___ | | | __) //| ( \ \| ( ) | | | | | | | | ( | (\ ( | | | | ) ( | ( ) | | | ( //| )___) ) ) ( | | | | | | (____/\ (____/\ | ) \ \__| (___) | | | | ) ( | (____/\ (____/\ //|/ \___/|/ \| )_( )_( (_______/_______/ |/ \__/(_______) \_/ |/ \|_______/_______/ //===== Battle Royale Script ====================================================================== // //= Script for a Battle Royale for Ragnarök // //===== By: ======================================================================================= // //= Original Version : Aerie PinkPanther //= BR sets by Kissaki // //===== Current Version: ========================================================================== // //= 1.5 // //===== Additional Comments: ====================================================================== // //1.0 = Original Version //1.1 = Stuffs rebalance //1.2 = Added Langue Choice / Stuff rebalance / Fix prize //1.3 = Status reset added (for get basic stats points on novice) //1.4 = qpet prevention //1.5 = qpet prevention fix ... (lame one) // //================================================================================================= //SQL //ALTER TABLE `char` ADD COLUMN `BR_Kill` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_Death` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_Round` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_Gold` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_Silver` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_Bronze` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_prize` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_PKill` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //ALTER TABLE `char` ADD COLUMN `BR_PDeath` INTEGER UNSIGNED NOT NULL DEFAULT '0' AFTER `rename`; //Source edit [by ~AnnieRuru~ : http://www.eathena.w...owtopic=270956] //mail.c //================================== //Look For : // bool mail_setattachment(struct map_session_data *sd, struct mail_message *msg) // { // int n; // nullpo_retr(false,sd); // nullpo_retr(false,msg); //================================== //Add after : // if ( sd->bl.m >= 0 && map[sd->bl.m].flag.nowarp ) { // clif_displaymessage(sd->fd,"You are not allowed to send mail in this map!"); // return false; // } br_map1 mapflag noteleport br_map1 mapflag nomemo br_map1 mapflag partylock br_map1 mapflag noicewall br_map1 mapflag loadevent br_map1 mapflag nocommand br_map1 mapflag nowarp br_map2 mapflag noteleport br_map2 mapflag nomemo br_map2 mapflag partylock br_map2 mapflag noicewall br_map2 mapflag nocommand br_map2 mapflag nowarp br_map3 mapflag noteleport br_map3 mapflag nomemo br_map3 mapflag partylock br_map3 mapflag noicewall br_map3 mapflag nocommand br_map3 mapflag nowarp br_map4 mapflag noteleport br_map4 mapflag nomemo br_map4 mapflag noicewall br_map4 mapflag nocommand br_map4 mapflag nowarp br_map5 mapflag noteleport br_map5 mapflag nomemo br_map5 mapflag noicewall br_map5 mapflag nocommand br_map5 mapflag nowarp br_main mapflag noteleport br_main mapflag nomemo br_main mapflag partylock br_main mapflag noicewall br_main mapflag nocommand br_main mapflag nowarp br_pvp mapflag pvp br_pvp mapflag noteleport br_pvp mapflag nomemo br_pvp mapflag noicewall br_pvp mapflag nocommand br_pvp mapflag nowarp //=================================================================================== // Acess NPC //=================================================================================== prontera,165,189,3 script Battle Royale#1 469,{ if (BR_Langue == 0) { set @name$,"^FF00CCAssistante BR^000000";} if (BR_Langue == 1) { set @name$,"^FF00CCBR Assistant^000000";} if (BR_Langue == 0) { callfunc "br_fr01";} if (BR_Langue == 1) { callfunc "br_en01";} end; Oninit: //Waiting Room waitingroom "Battle Royale",0; end; } //=================================================================================== // Script Principal //=================================================================================== - script BR_Core -1,{ //=================================================================================== // Configuration //=================================================================================== OnInit: //Choice of language - Choix de la langue (0 = french / 1 = english) set $BR_Langue,1; //Pourcentage to get an item in a stuff -Pourcentage de chance d'obtenir les objets set $BR_rand,90; //Level min for give an access to GM menu - Niveau minimal pour l'accès au menu GM set $GM_Minlvl,20; //Atcommand symbol set $BR_Atcom$,"!"; //Style set $BR_Hsty,30; set $BR_Hcolor,40; set $BR_Ccolor,99; //Map names - Nom des Maps setarray $BR_map$[1],"br_map1","br_map2","br_map3","br_map4","br_map5"; setarray $BR_mapName$[1],"La Porte d'Arsinoé","L'Oasis","Le Temple abandonné","Nid de l'Aigle","Bois de Jacamar"; //Name of events setarray $BR_Mod$[1],"Free For All","Team Death Match"; //Name of Teams setarray $BR_TeamName$[1],"Napoléon","Nelson"; //Coordinates for comeback in town set $BRmap$,"prontera"; set $BRx,156; set $BRy,182; //Rewards - Récompenses 1-2-3. (4 = TvT reward for each person) set $BR_Recomp,671; setarray $BR_Recompnb[1],20,10,5,5; //====================================== // No modifications needed //====================================== //Status of the Event : O = off / 1 = inscriptions / 2 = Stuff / 3 = Fight / 4 = Récompense TvT set $BR_Progress,0; //Number of Player in use set $@BR_PlayerIn,0; set $@BR_PlayerT1,0; set $@BR_PlayerT2,0; //For TvT event spawn setarray $BR_CoorX$[4],"90","102"; setarray $BR_CoorY$[4],"40","49"; setarray $BR_CoorX2$[4],"33","66"; setarray $BR_CoorY2$[4],"177","167"; //Remove Mapflags setarray $BR_NPcnames$[1],"Battle#ep1","Battle#ep2","Battle#ep3","Battle#ep4","Battle#ep6"; //Setcell for TvT setcell ""+$BR_map$[4]+"",28,167,31,167,cell_walkable,0; setcell ""+$BR_map$[4]+"",93,57,86,57,cell_walkable,0; setcell ""+$BR_map$[5]+"",77,77,71,64,cell_walkable,0; setcell ""+$BR_map$[5]+"",116,67,117,85,cell_walkable,0; setcell ""+$BR_map$[5]+"",51,158,64,147,cell_walkable,0; setcell ""+$BR_map$[5]+"",92,164,97,197,cell_walkable,0; //Clean list donpcevent "BR-PvP#ep1::OnDelete"; //Activate PvPoff set .@size, getarraysize ($BR_NPcnames$); for( set .@i, 0; .@i < .@size; set .@i, .@i +1 ) { donpcevent ""+$BR_NPcnames$[.@i]+"::OnPvPoff"; } end; //=================================================================================== // Progress //=================================================================================== OnStart: //Inscriptions On set $BR_reset,0; set $BR_Progress,1; if ($BR_Mod == 1) { set $BR_map, rand(1,3); } if ($BR_Mod == 2) { set $BR_map, rand(4,5); } if ($BR_Langue == 0) { announce "Battle Royale : Nous vous proposons de faire un "+$BR_Mod$[$BR_Mod]+"",bc_all,0xffff40 ; } if ($BR_Langue == 1) { announce "Battle Royale : A "+$BR_Mod$[$BR_Mod]+" will start !",bc_all,0xffff40 ; } sleep2 5000; set .@i,2; while(.@i >= 1) { if ($BR_Langue == 0) { announce "Battle Royale : Début des hostilités dans "+.@i+" minute(s) ! Pour participer veuillez créer un novice et vous adressez à l'Assistante BR",bc_all,0xBF3030;} if ($BR_Langue == 1) { announce "Battle Royale : The Fight will start in "+.@i+" minute(s) ! You must create a novice and talk to the BR Assistant for participate.",bc_all,0xBF3030;} set .@i,.@i-1; sleep2 60000; } if ($BR_Langue == 0) { announce "Les Inscriptions sont ouvertes !",bc_all,0xBF3030;} if ($BR_Langue == 1) { announce "Inscriptions are open !",bc_all,0xBF3030;} set $BR_Progress,2; sleep2 5000; if ($BR_Langue == 0) { mapannounce "br_main","Battle Royale : Vous pouvez désormais vous inscrire ! La Bataille se déroulera dans "+$BR_mapName$[$BR_map]+" ! ",1,0xFFCC66;} if ($BR_Langue == 1) { mapannounce "br_main","Battle Royale : You can register ! The Battle will take place in "+$BR_mapName$[$BR_map]+" ! ",1,0xFFCC66;} //sleep2 30000; //Minutes set .@i,5; while(.@i >= 1) { if ($BR_Langue == 0) { mapannounce "br_main","Battle Royale : Vous avez "+.@i+" minute(s) pour vous préparer au combat.",1,0xBF3030;} if ($BR_Langue == 0) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : Vous avez "+.@i+" minute(s) pour vous préparer au combat.",1,0xBF3030;} if ($BR_Langue == 1) { mapannounce "br_main","Battle Royale : You have "+.@i+" minute(s) for be ready for the fight.",1,0xBF3030;} if ($BR_Langue == 1) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : You have "+.@i+" minute(s) for be ready for the fight.",1,0xBF3030;} if ($BR_Mod == 2 && $BR_Langue == 0) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : Veuillez former une équipe pour affronter vos adversaires.",1,0xBF3030; } if ($BR_Mod == 2 && $BR_Langue == 1) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : You must organize a team for fight the opponant team.",1,0xBF3030; } set .@i,.@i-1; sleep2 60000; } //Secondes set .@i,10; while(.@i >= 1) { if ($BR_Langue == 0) { mapannounce "br_main","Battle Royale : Encore "+.@i+" seconde(s) !",1,0xBF3030; } if ($BR_Langue == 0) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : Encore "+.@i+" seconde(s) !",1,0xBF3030; } if ($BR_Langue == 1) { mapannounce "br_main","Battle Royale : "+.@i+" second(s) left !",1,0xBF3030; } if ($BR_Langue == 1) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : "+.@i+" second(s) left !",1,0xBF3030; } set .@i,.@i-1; sleep2 1000; } if ($BR_Langue == 0) { mapannounce "br_main","C'est Parti !",1,0xBF3030; } if ($BR_Langue == 0) { mapannounce ""+$BR_map$[$BR_map]+"","C'est Parti !",1,0xBF3030;} if ($BR_Langue == 1) { mapannounce "br_main","Let's Go !",1,0xBF3030; } if ($BR_Langue == 1) { mapannounce ""+$BR_map$[$BR_map]+"","Let's Go !",1,0xBF3030;} set $BR_Progress,3; set .@size, getarraysize ($BR_NPcnames$); for( set .@i, 0; .@i < .@size; set .@i, .@i +1 ) { donpcevent ""+$BR_NPcnames$[.@i]+"::OnPvPon"; } //Ouvrir les Walkables setcell ""+$BR_map$[4]+"",28,167,31,167,cell_walkable,1; setcell ""+$BR_map$[4]+"",93,57,86,57,cell_walkable,1; setcell ""+$BR_map$[5]+"",77,77,71,64,cell_walkable,1; setcell ""+$BR_map$[5]+"",116,67,117,85,cell_walkable,1; setcell ""+$BR_map$[5]+"",51,158,64,147,cell_walkable,1; setcell ""+$BR_map$[5]+"",92,164,97,197,cell_walkable,1; //Minutes avant la Fin set .@i,10; while(.@i >= 1) { if ($BR_reset == 1) { set $BR_reset,0; end;} if ($BR_Langue == 0) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale : Il vous reste encore "+.@i+" minute(s) pour vous entretuer!",1,0xBF3030;} if ($BR_Langue == 1) { mapannounce ""+$BR_map$[$BR_map]+"","Battle Royale :"+.@i+" minute(s) left !",1,0xBF3030;} set .@i,.@i-1; sleep2 60000; } mapwarp ""+$BR_map$[$BR_map]+"","br_main",103,58; sleep2 30000; donpcevent "BR_Core::OnInit"; end; OnEnd: sleep2 5000; if ($BR_Mod == 2) { mapwarp ""+$BR_map$[$BR_map]+"","br_main",135,102; set $BR_Progress,4; sleep2 180000;} if ($BR_Mod == 1) { if ($BR_Langue == 0) { announce "Battle Royale : Le Vainqueur de cette édition est : "+$@q$+" !",bc_all,0xBF3030;} if ($BR_Langue == 1) { announce "Battle Royale : The Winner is : "+$@q$+" !",bc_all,0xBF3030;} //For Reset Time (if too short game) set $BR_reset,1; sleep2 60000;} donpcevent "BR_Core::OnInit"; end; //=================================================================================== // On Kill / Death / Login / Logout //=================================================================================== OnPCDieEvent: if (getgmlevel() > $GM_Minlvl) { end; } getmapxy @map$,@x,@y,0; //================= // BR-PvP //================= if (@map$ == "br_pvp") { set .@z,getcharid(0); query_sql("SELECT `BR_PDeath` FROM `char` WHERE `char_id` = '"+.@z+"'",.@countZ); setarray .@countZ[0],.@countZ[0]+1; query_sql "UPDATE `char` SET `BR_PDeath` = '"+.@countZ[0]+"' WHERE `char_id` ='"+.@z+"'"; if(killerrid==0) { dispbottom "Vous venez de vous suicider.";end;} set @killer$, rid2name(killerrid); set $@killer$, rid2name(killerrid); dispbottom "Vous avez été tué par "+@killer$+"!"; end; } //================= // FFA / TvT //================= set @size, getarraysize ($BR_map$); for( set .@i, 0; .@i < @size; set .@i, .@i +1 ) { if (@map$ == $BR_map$[.@i]) { set .@b,getcharid(0); query_sql("SELECT `BR_Death` FROM `char` WHERE `char_id` = '"+.@b+"'",.@countA); setarray .@countA[0],.@countA[0]+1; query_sql "UPDATE `char` SET `BR_Death` = '"+.@countA[0]+"' WHERE `char_id` ='"+.@b+"'"; if(killerrid==0) { dispbottom "Vous venez de vous suicider.";end;} set @killer$, rid2name(killerrid); set $@killer$, rid2name(killerrid); if ($BR_Langue == 0) { dispbottom "Vous avez été tué par "+@killer$+"!"; } if ($BR_Langue == 1) { dispbottom "You have been kill by "+@killer$+"!"; } if ($BR_Mod == 1) { set $@BR_PlayerIn,$@BR_PlayerIn-1; } if ($@BR_PlayerIn == 2 && $BR_Mod == 1) { set .@d,getcharid(0); query_sql("SELECT `BR_Bronze` FROM `char` WHERE `char_id` = '"+.@d+"'",.@countC); setarray .@countC[0],.@countC[0]+1; query_sql "UPDATE `char` SET `BR_Bronze` = '"+.@countC[0]+"' WHERE `char_id` ='"+.@d+"'"; query_sql("SELECT `BR_prize` FROM `char` WHERE `char_id` = '"+.@d+"'",.@PcountC); setarray .@PcountC[0],.@PcountC[0]+$BR_Recompnb[3]; query_sql "UPDATE `char` SET `BR_prize` = '"+.@PcountC[0]+"' WHERE `char_id` ='"+.@d+"'"; } if ($@BR_PlayerIn == 1 && $BR_Mod == 1) { set .@e,getcharid(0); query_sql("SELECT `BR_Silver` FROM `char` WHERE `char_id` = '"+.@e+"'",.@countE); setarray .@countE[0],.@countE[0]+1; query_sql "UPDATE `char` SET `BR_Silver` = '"+.@countE[0]+"' WHERE `char_id` ='"+.@e+"'"; query_sql("SELECT `BR_prize` FROM `char` WHERE `char_id` = '"+.@e+"'",.@DcountC); setarray .@DcountC[0],.@DcountC[0]+$BR_Recompnb[2]; query_sql "UPDATE `char` SET `BR_prize` = '"+.@DcountC[0]+"' WHERE `char_id` ='"+.@e+"'"; } if ($BR_Mod == 2) { if (BR_Team == 1) { set $@BR_PlayerT1,$@BR_PlayerT1-1; } if (BR_Team == 2) { set $@BR_PlayerT2,$@BR_PlayerT2-1; } } set br_user,0; if ($BR_Mod == 1) { warp "br_main",103,58; } if ($BR_Mod == 2) { warp "br_main",135,102; } callfunc "BR_Del"; sleep2 200; atcommand ""+$BR_Atcom$+"raise"; } } end; //=================================================================================== OnPCKillEvent: if (getgmlevel() > $GM_Minlvl) { end; } getmapxy @map$,@x,@y,0; sleep2 200; //================= // BR-PvP //================= if (@map$ == "br_pvp") { set .@y,getcharid(0); query_sql("SELECT `BR_PKill` FROM `char` WHERE `char_id` = '"+.@y+"'",.@countY); setarray .@countY[0],.@countY[0]+1; query_sql "UPDATE `char` SET `BR_PKill` = '"+.@countY[0]+"' WHERE `char_id` ='"+.@y+"'"; set @killed$, rid2name(killedrid); if ($BR_Langue == 0) { dispbottom "Vous venez de tuer "+@killed$+"!";} if ($BR_Langue == 1) { dispbottom "You have kill "+@killed$+"!";} if(strcharinfo(0)!=@killed$ && $BR_Langue == 0) { mapannounce "br_pvp",""+@killed$+" a été tué par "+$@killer$+" !",1,0xBF3030; } if(strcharinfo(0)!=@killed$ && $BR_Langue == 1) { mapannounce "br_pvp",""+@killed$+" have been kill by "+$@killer$+" !",1,0xBF3030; } end; } //================= // FFA / TvT //================= //Quand plus personne ... if (@map$ == $BR_map$[1] && $@BR_PlayerIn == 1 && $BR_Progress == 3 || @map$ == $BR_map$[2] && $@BR_PlayerIn == 1 && $BR_Progress == 3 || @map$ == $BR_map$[3] && $@BR_PlayerIn == 1 && $BR_Progress == 3) { set .@f,getcharid(0); set $@q$,strcharinfo(0); query_sql("SELECT `BR_Gold` FROM `char` WHERE `char_id` = '"+.@f+"'",.@countF); //Verif le nom setarray .@countF[0],.@countF[0]+1; query_sql "UPDATE `char` SET `BR_Gold` = '"+.@countF[0]+"' WHERE `char_id` ='"+.@f+"'"; query_sql("SELECT `BR_prize` FROM `char` WHERE `char_id` = '"+.@f+"'",.@AcountC); setarray .@AcountC[0],.@AcountC[0]+$BR_Recompnb[1]; query_sql "UPDATE `char` SET `BR_prize` = '"+.@AcountC[0]+"' WHERE `char_id` ='"+.@f+"'"; set $@BR_PlayerIn,0; set br_user,0; donpcevent "BR_Core::OnEnd"; warp "br_main",103,58; callfunc "BR_Del"; end; } if ( $@BR_PlayerT1 == 0 && @map$ == $BR_map$[4] || $@BR_PlayerT1 == 0 && @map$ == $BR_map$[5]) { if ($BR_Langue == 0) { announce "Battle Royale : L'équipe "+$BR_TeamName$[2]+" vient de remporter le "+$BR_Mod$[$BR_Mod]+" !",bc_all,0xBF3030;} if ($BR_Langue == 1) { announce "Battle Royale : The Team "+$BR_TeamName$[2]+" just won the "+$BR_Mod$[$BR_Mod]+" !",bc_all,0xBF3030;} set $BR_Win,2; donpcevent "BR_Core::OnEnd"; } if ( $@BR_PlayerT2 == 0 && @map$ == $BR_map$[4] || $@BR_PlayerT2 == 0 && @map$ == $BR_map$[5]) { if ($BR_Langue == 0) { announce "Battle Royale : L'équipe "+$BR_TeamName$[1]+" vient de remporter le "+$BR_Mod$[$BR_Mod]+" !",bc_all,0xBF3030; } if ($BR_Langue == 1) { announce "Battle Royale : The Team "+$BR_TeamName$[1]+" just won the "+$BR_Mod$[$BR_Mod]+" !",bc_all,0xBF3030;} set $BR_Win,1; donpcevent "BR_Core::OnEnd";} set @size, getarraysize ($BR_map$); for( set .@i, 0; .@i < @size; set .@i, .@i +1 ) { if (@map$ == $BR_map$[.@i]) { set .@c,getcharid(0); query_sql("SELECT `BR_Kill` FROM `char` WHERE `char_id` = '"+.@c+"'",.@countB); //Verif le nom setarray .@countB[0],.@countB[0]+1; query_sql "UPDATE `char` SET `BR_Kill` = '"+.@countB[0]+"' WHERE `char_id` ='"+.@c+"'"; set @killed$, rid2name(killedrid); if ($BR_Langue == 0) { dispbottom "Vous venez de tuer "+@killed$+"!"; } if ($BR_Langue == 1) { dispbottom "You have kill "+@killed$+"!"; } //Annonce Mort if(strcharinfo(0)!=@killed$ && $BR_Langue == 0) { mapannounce ""+$BR_map$[$BR_map]+"",""+@killed$+" a été tué par "+$@killer$+" !",1,0xBF3030; } if(strcharinfo(0)!=@killed$ && $BR_Langue == 1) { mapannounce ""+$BR_map$[$BR_map]+"",""+@killed$+" have been kill "+$@killer$+" !",1,0xBF3030; } } } end; //=================================================================================== OnPCLoginEvent: getmapxy @map$,@x,@y,0; set @size, getarraysize ($BR_map$); for( set .@i, 1; .@i <= @size; set .@i, .@i +1 ) { if (getgmlevel() > $GM_Minlvl && @map$ == $BR_map$[.@i]) { warp $BRmap$,$BRx,$BRy; end; }} if (@map$ == $BR_map$[1] || @map$ == $BR_map$[2] || @map$ == $BR_map$[3] || @map$ == $BR_map$[4] || @map$ == $BR_map$[8] || br_user == 1 || @map$ == "br_pvp") { callfunc "BR_Del"; set br_user,0; warp "br_main",103,58; } end; //=================================================================================== OnPCLogoutEvent: if (getgmlevel() > $GM_Minlvl) { end; } getmapxy @map$,@x,@y,0; if (@map$ == $BR_map$[1] || @map$ == $BR_map$[2] || @map$ == $BR_map$[3]) { set $@BR_PlayerIn,$@BR_PlayerIn-1; //If disconnect during event and only 2 people stay if ($@BR_PlayerIn == 1) { sleep2 50; set .@size, getarraysize ($BR_NPcnames$); for( set .@i, 0; .@i < .@size; set .@i, .@i +1 ) { donpcevent ""+$BR_NPcnames$[.@i]+"::OnEnd";} } } if (@map$ == $BR_map$[4] || @map$ == $BR_map$[5]) { if (BR_Team == 1) { set $@BR_PlayerT1,$@BR_PlayerT1-1; } if (BR_Team == 2) { set $@BR_PlayerT2,$@BR_PlayerT2-1; } } end; //=================================================================================== OnPCLoadMapEvent: getmapxy @map$,@x,@y,0; if ( @map$ == "br_main") { callfunc "BR_Del"; set br_user,0;} end; } //=================================================================================== // NPC //=================================================================================== br_main,107,119,3 script Inscription#ep1 466,{ set @name$,"^FF00CCAssistante BR^000000"; if (BaseLevel != 1 && Joblevel != 1 && Weight != 0) { mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Je vais réinitialiser votre personnage !";} if (BR_Langue == 1) { mes "I'll reset your char !";} close2; callfunc "BR_Del"; end; } if ($BR_Progress == 2) { mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Voulez-vous vous inscrire ?"; mes "Cette fois-ci la Battle Royale se déroule dans "+$BR_mapName$[$BR_map]+".";} if (BR_Langue == 1) { mes "Do you want subscribe ?"; mes "This time the Battle Royale will take place in "+$BR_mapName$[$BR_map]+".";} next; switch( select("•Participer:•Statistiques:•Quitter") ) { case 1: mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Bien allons-y et bonne chance !";} if (BR_Langue == 1) { mes "Let's go and good luck !";} close2; callfunc "BR_Job"; //return if ($BR_Mod == 1) { set $@BR_PlayerIn,$@BR_PlayerIn+1; } //Participation set .@a,getcharid(0); query_sql("SELECT `BR_Round` FROM `char` WHERE `char_id` = '"+.@a+"'",.@countD); //Verif le nom setarray .@countD[0],.@countD[0]+1; query_sql "UPDATE `char` SET `BR_Round` = '"+.@countD[0]+"' WHERE `char_id` ='"+.@a+"'"; set br_user,1; savepoint "br_main",103,58; //Mod TvT if ($BR_Mod == 2) { if ( .BR_Team == 0) { set .BR_Team,1; set BR_Team,1; set $@BR_PlayerT1,$@BR_PlayerT1+1; set @x,$BR_CoorX$[$BR_map]; set @y,$BR_CoorY$[$BR_map]; warp ""+$BR_map$[$BR_map]+"",@x,@y; end;} set .BR_Team,0; set BR_Team,2; set $@BR_PlayerT2,$@BR_PlayerT2+1; set @x,$BR_CoorX2$[$BR_map]; set @y,$BR_CoorY2$[$BR_map]; warp ""+$BR_map$[$BR_map]+"",@x,@y; end; } sleep2 20; callfunc "BR_Skill"; warp ""+$BR_map$[$BR_map]+"",0,0; end; case 2: mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Voici les statistiques de la Battle Royale :";} if (BR_Langue == 1) { mes "Here are Battle Royale statistiques :";} close2; callfunc "BR_stats"; end; case 3: close; } } mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "La Battle Royale est actuellement:";} if (BR_Langue == 1) { mes "Battle Royale is currently :";} if ($BR_Progress == 0 && BR_Langue == 0) { mes "^33CC00La Battle Royale n'est pas en cours.^000000";} if ($BR_Progress == 1 && BR_Langue == 0) { mes "^33CC00La Battle Royale est en phase de Recrutement.^000000";} if ($BR_Progress == 3 && BR_Langue == 0) { mes "^33CC00La Battle Royale est en phase de Combat.^000000";} if ($BR_Progress == 4 && BR_Langue == 0) { mes "^33CC00La Battle Royale est en phase de Récompense.^000000";} if ($BR_Progress == 0 && BR_Langue == 1) { mes "^33CC00Battle Royale isn't in progress.^000000";} if ($BR_Progress == 1 && BR_Langue == 1) { mes "^33CC00Battle Royale is in recruitement phase.^000000";} if ($BR_Progress == 3 && BR_Langue == 1) { mes "^33CC00Battle Royale is in fighting phase.^000000";} if ($BR_Progress == 4 && BR_Langue == 1) { mes "^33CC00Battle Royale is in rewarding phase.^000000";} if (BR_Langue == 0) { mes "Vous ne pouvez donc pas vous inscrire.";} if (BR_Langue == 1) { mes "So you can't register for now.";} close; } //=================================================================================== br_main,100,119,3 script BR-PvP#ep1 124,{ set @name$,"^FF00CCAssistante BR^000000"; if (@leave == 1 && BR_Langue == 0) { mes "[" + @name$ + "]"; mes "Vous devez vous déconnecter avant de poursuivre votre chemin."; close; } if (@leave == 1 && BR_Langue == 1) { mes "[" + @name$ + "]"; mes "You must disconnect before continue."; close; } if (BaseLevel != 1 && Joblevel != 1 && Weight != 0) { mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Je vais réinitialiser votre personnage !";} if (BR_Langue == 1) { mes "I'll reset your character.";} close2; callfunc "BR_Del"; end; } mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Attention, vous devez attendre plusieurs minutes si vous voulez changer de stuff !"; } if (BR_Langue == 1) { mes "Beware, you must wait some minutes before changing your stuff !";} if ($BR_PvP == 0 && BR_Langue == 0) { mes "La BR-PvP est ^FF3300 Désactivé^000000"; mes "Vous ne pouvez pas vous inscrire pour le moment !"; close;} if ($BR_PvP == 0 && BR_Langue == 1) { mes "BR-PvP is ^FF3300 Desactivate^000000"; mes "You can't register for now !"; close;} if (BR_Langue == 0) { mes "La BR-PvP est ^66FF33 Activé^000000"; mes "Il y a pour le moment ["+getmapusers("br_pvp")+"] personne(s) dans la salle.";} if (BR_Langue == 1) { mes "BR-PvP is ^66FF33 Active^000000"; mes "There is ["+getmapusers("br_pvp")+"] person(s) in the room.";} next; if( select("•Oui:•Non") == 2 ) close; mes "[" + @name$ + "]"; set @size, getarraysize ($BR_PvPNames$); for( set .@i, 0; .@i <= @size; set .@i, .@i +1 ) { if (strcharinfo(0) == $BR_PvPNames$[.@i]) { if (BR_Langue == 0) { mes "Vous ne pouvez pas vous inscrire pour le moment, vous allez devoir patienter quelques minutes.";} if (BR_Langue == 1) { mes "You can't register, you must wait some minutes.";} close;} } if (BR_Langue == 0) { mes "Bien, je vais vous conduire dans la salle de préparation !";} if (BR_Langue == 1) { mes "Let's go to the next room.";} close2; set @size,@size+1; set $BR_PvPNames$[@size],strcharinfo(0); callfunc "BR_Job"; warp "br_main",71,102; savepoint "br_main",71,102; set br_user,1; end; OnDelete: if ($BR_PvP == 0) { end;} deletearray $BR_PvPNames$[0],128; sleep2 300000; donpcevent "BR-PvP#ep1::OnDelete"; end; } //=================================================================================== br_main,72,106,3 script BR-PvP#ep2 124,{ set @name$,"^FF00CCAssistante BR^000000"; if (@leave == 1 && BR_Langue == 0) { mes "[" + @name$ + "]"; mes "Vous devez vous déconnecter avant de poursuivre votre chemin."; close; } if (@leave == 1 && BR_Langue == 1) { mes "[" + @name$ + "]"; mes "You must disconnect before continue."; close; } mes "[" + @name$ + "]"; mes "Que voulez-vous faire ?"; if ($BR_PvP == 0) { mes "La BR-PvP est ^FF3300 Désactivé^000000";} if ($BR_PvP == 1) { mes "La BR-PvP est ^66FF33 Activé^000000";} next; switch( select("•Participer:•Sortir:•Annuler") ) { case 1: mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Bien allons-y !";} if (BR_Langue == 1) { mes "Let's go !";} close2; warp "br_pvp",0,0; end; case 2: mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Je vais réinitialiser votre personnage ...";} if (BR_Langue == 1) { mes "I'll reset your character ...";} close2; callfunc "BR_Del"; warp "br_main",103,58; savepoint "br_main",103,58; end; case 3: close; } } //=================================================================================== br_map1,95,83,3 script Battle#ep1 430,{ set @name$,"^FF00CCAssistante BR^000000"; if (BR_Langue == 0) { callfunc "br_fr02";} if (BR_Langue == 1) { callfunc "br_en02";} OnInit: waitingroom "Battle Manager",0; end; OnPvPon: atcommand ""+$BR_Atcom$+"pvpon"; end; OnPvPoff: atcommand ""+$BR_Atcom$+"pvpoff"; end; OnEnd: atcommand ""+$BR_Atcom$+"doommap"; end; } br_map2,79,61,4 duplicate(Battle#ep1) Battle#ep2 430 br_map3,122,147,4 duplicate(Battle#ep1) Battle#ep3 430 br_map4,29,178,4 duplicate(Battle#ep1) Battle#ep4 430 br_map4,84,36,4 duplicate(Battle#ep1) Battle#ep5 430 br_map5,95,52,3 duplicate(Battle#ep1) Battle#ep6 430 br_map5,80,156,4 duplicate(Battle#ep1) Battle#ep7 430 br_main,65,98,4 duplicate(Battle#ep1) Battle#ep8 430 //=================================================================================== br_main,142,97,3 script Sortie#ep2 430,{ set @name$,"^FF00CCAssistante BR^000000"; mes "[" + @name$ + "]"; if ($BR_Progress == 4) { if (BR_Langue == 0) { mes "L'équipe gagnante est celle de "+$BR_TeamName$[$BR_Win]+" !";} if (BR_Langue == 1) { mes "The winning team is "+$BR_TeamName$[$BR_Win]+" !";} if (BR_Team == 1 && BR_Langue == 0) { mes "Votre équipe est celle de "+$BR_TeamName$[1]+"."; } if (BR_Team == 2 && BR_Langue == 0) { mes "Votre équipe est celle de "+$BR_TeamName$[2]+"."; } if (BR_Team != $BR_Win && BR_Langue == 0) { mes "Vous avez donc perdu !"; close2; callfunc "BR_Del"; warp $BRmap$,$BRx,$BRy; end;} if (BR_Team == 1 && BR_Langue == 1) { mes "Your team is "+$BR_TeamName$[1]+"."; } if (BR_Team == 2 && BR_Langue == 1) { mes "Your team is "+$BR_TeamName$[2]+"."; } if (BR_Team != $BR_Win && BR_Langue == 1) { mes "You have loose this game !"; close2; callfunc "BR_Del"; warp $BRmap$,$BRx,$BRy; end;} if (BR_Team == $BR_Win) { if (BR_Langue == 0) { mes "Vous avez donc gagné ! Voici votre prix ...";} if (BR_Langue == 1) { mes "You have won ! Here your price ...";} close2; set .@f,getcharid(0); query_sql("SELECT `BR_prize` FROM `char` WHERE `char_id` = '"+.@f+"'",.@countF); //Verif le nom setarray .@countF[0],.@countF[0]+$BR_Recompnb[4]; query_sql "UPDATE `char` SET `BR_prize` = '"+.@countF[0]+"' WHERE `char_id` ='"+.@f+"'"; set br_user,0; callfunc "BR_Del"; warp $BRmap$,$BRx,$BRy; end; } } mes "Pour obtenir votre prix vous devez attendre la fin de la bataille."; if ($BR_Progress <= 2) { close2; callfunc "BR_Del"; warp $BRmap$,$BRx,$BRy; end;} if ($BR_Progress == 3 && BR_Langue == 0) { mes "^33CC00La Battle Royale est en phase de Combat.^000000";} if ($BR_Progress == 3 && BR_Langue == 1) { mes "^33CC00Battle Royale is currently in fight phasis.^000000";} if (BR_Langue == 0) { mes "Voulez-vous sortir de la Battle Royale (Sans récompense) ?";} if (BR_Langue == 1) { mes "Do you want leave the Battle Royale (without reward) ?";} next; if( select("Oui:Non") == 2 ) close; close2; callfunc "BR_Del"; set br_user,0; warp $BRmap$,$BRx,$BRy; end; } //=================================================================================== br_main,97,49,3 script Sortie#ep1 430,{ set @name$,"^FF00CCAssistante BR^000000"; mes "[" + @name$ + "]"; if (BR_Langue == 0) { mes "Voulez-vous sortir de la Battle Royale ?";} if (BR_Langue == 1) { mes "Do you want leave the Battle Royale ?";} next; if( select("Oui:Non") == 2 ) close; close2; if (getgmlevel() > $GM_Minlvl) { warp $BRmap$,$BRx,$BRy; end; } if (kick == 1 && @leave == 1) { set kick,0; atcommand ""+$BR_Atcom$+"kick "+strcharinfo(0)+""; end;} if (@leave == 1 && BR_Langue == 0) { mes "[" + @name$ + "]"; mes "Vous devez vous déconnecter avant de poursuivre votre chemin."; close; } if (@leave == 1 && BR_Langue == 1) { mes "[" + @name$ + "]"; mes "You must log out before going further."; close; } callfunc "BR_Del"; set br_user,0; warp $BRmap$,$BRx,$BRy; end; } //=================================================================================== br_map4,95,36,3 script #Br_Pn01a 837,{ end; OnInit: waitingroom ""+$BR_TeamName$[1]+"",0; end; } br_map5,110,55,4 duplicate(#Br_Pn01a) #Br_Pn02a 837 //=================================================================================== br_map4,38,178,3 script #Br_Pn01b 837,{ end; OnInit: waitingroom ""+$BR_TeamName$[2]+"",0; end; } br_map5,63,166,4 duplicate(#Br_Pn01b) #Br_Pn02b 837 //=================================================================================== // Skills Platinum //=================================================================================== function script BR_Skill { skill 142,1,0; // First Aid if (BaseClass == Job_Novice) { skill 143,1,0; // Play Dead } else if (BaseClass == Job_Swordman) { skill 144,1,0; // Moving HP-Recovery skill 145,1,0; // Fatal Blow skill 146,1,0; // Auto Berserk } else if (BaseClass == Job_Mage) { skill 157,1,0; // Energy Coat } else if (BaseClass == Job_Archer) { skill 147,1,0; // Arrow Crafting skill 148,1,0; // Arrow Repel } else if (BaseClass == Job_Merchant) { skill 153,1,0; // Cart Revolution skill 154,1,0; // Change Cart skill 155,1,0; // Crazy Uproar } else if (BaseClass == Job_Thief) { skill 149,1,0; // Sand Attack skill 150,1,0; // Back Slide skill 151,1,0; // Find Stone skill 152,1,0; // Stone Fling } else if (BaseClass == Job_Acolyte) { skill 156,1,0; // Holy Light } if (Class == Job_Knight || Class == Job_Lord_Knight) { skill 1001,1,0; // Charge Attack } else if (Class == Job_Crusader || Class == Job_Paladin) { skill 1002,1,0; // Shrink } else if (Class == Job_Wizard || Class == Job_High_Wizard) { skill 1006,1,0; // Sight Blaster } else if (Class == Job_Sage || Class == Job_Professor) { skill 1007,1,0; // Create Elemental Converter skill 1008,1,0; // Elemental Change Water skill 1017,1,0; // Elemental Change Earth skill 1018,1,0; // Elemental Change Fire skill 1019,1,0; // Elemental Change Wind } else if (Class == Job_Hunter || Class == Job_Sniper) { skill 1009,1,0; // Phantasmic Arrow } else if (Class == Job_Bard || Class == Job_Clown) { skill 1010,1,0; // Pang Voice } else if (Class == Job_Dancer || Class == Job_Gypsy) { skill 1011,1,0; // Wink of Charm } else if (Class == Job_Blacksmith || Class == Job_Whitesmith) { skill 1012,1,0; // Unfair Trick skill 1013,1,0; // Greed } else if (Class == Job_Alchemist || Class == Job_Creator) { skill 238,1,0; // Bioethics } else if (Class == Job_Assassin || Class == Job_Assassin_Cross) { skill 1003,1,0; // Sonic Acceleration skill 1004,1,0; // Throw Venom Knife } else if (Class == Job_Rogue || Class == Job_Stalker) { skill 1005,1,0; // Close Confine } else if (Class == Job_Priest || Class == Job_High_Priest) { skill 1014,1,0; // Redemptio } else if (Class == Job_Monk || Class == Job_Champion) { skill 1015,1,0; // Ki Translation skill 1016,1,0; // Ki Explosion } return; } //=================================================================================== // Récompenses //=================================================================================== function script BR_prize { if (BR_Langue == 0) { callfunc "br_fr03";} if (BR_Langue == 1) { callfunc "br_en03";} } //=================================================================================== // Statistiques //=================================================================================== function script BR_stats { if (BR_Langue == 0) { callfunc "br_fr04";} if (BR_Langue == 1) { callfunc "br_en04";} } //=================================================================================== // Fonction Job / Items //=================================================================================== function script BR_Del { getinventorylist; for(set @i, 0; @i < @inventorylist_count; set @i, @i + 1) { delitem @inventorylist_id[@i],@inventorylist_amount[@i];} //Cart inventory clean if (BaseClass == Job_Merchant) { set .@b,getcharid(0); query_sql "UPDATE `cart_inventory` SET `char_id` = '0' WHERE `char_id` ='"+.@b+"'"; query_sql "UPDATE `homunculus` SET `char_id` = '0' WHERE `char_id` ='"+.@b+"'"; set kick,1; } set @leave,1; jobchange 0; set Baselevel,1; set Joblevel,1; resetstatus; resetskill; set skillpoint,0; set statuspoint,0; set zeny,0; resetstatus; return; } //=================================================================================== // Fonction Job / Items //=================================================================================== function script BR_Job { if (sex == 0) { setarray .@jobID[1],4008,4017,4018,4015,4012,4019,4011,4021,4009,4010,4013,4016;} if (sex == 1) { setarray .@jobID[1],4008,4017,4018,4015,4012,4019,4011,4020,4009,4010,4013,4016;} set @job, rand(1,12); jobchange .@jobID[@job]; set Baselevel,99; set Joblevel,70; resetstatus; resetskill; set skillpoint,127; set statuspoint,1325; set @set, rand(1,2); //================================================= //Lord Knight //================================================= if(@job == 1 && @set == 1) { setarray .@itemIDjob[1],2537,2375,2433,5280,1183,1186,2254,2291,2789,2729,4103,4337,4141,4079,4035,4334,4303,657,12118,12119,12120,12121,4097; setarray .@itemNBjob[1],1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,5,1,1,1,1,1; setarray .@itemREjob[1],5,5,5,7,5,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 1 && @set == 2) { setarray .@itemIDjob[1],2123,1422,1415,2391,2554,5170,5137,5325,2701,2423,4269,4133,4064,4044,4105,4035,4031,657,12118,12119,12120,12121,4058; setarray .@itemNBjob[1],1,1,1,1,1,1,1,1,2,1,1,1,2,1,1,2,1,5,1,1,1,1,1; setarray .@itemREjob[1],7,7,5,7,5,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Professeur //================================================= if(@job == 2 && @set == 1) { setarray .@itemIDjob[1],12065,2115,2537,2433,2319,1228,1637,5293,2701,2701,5325,4058,4334,4031,4194,4064,4433,4107,717,716,715,1025,12118,12119,12120,12121; setarray .@itemNBjob[1],2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,40,30,40,20,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,5,5,5,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 2 && @set == 2) { setarray .@itemIDjob[1],12065,2374,2131,2554,1637,5341,2423,2701,2701,4064,4416,5325,5362,4058,4133,4315,4105,4412,717,716,715,1025,12118,12119,12120,12121,1644; setarray .@itemNBjob[1],2,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,40,30,40,20,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,7;} //================================================= //Stalker //================================================= if(@job == 3 && @set == 1) { setarray .@itemIDjob[1],12029,2124,2553,2399,5170,13037,13038,2423,2789,2702,4137,5074,5361,4035,4334,4102,4112,4079,4084,4058,4141,657,12118,12119,12120,12121,12012,12008,12183,12010,12087,4017; setarray .@itemNBjob[1],10,1,1,1,1,1,1,1,1,1,1,1,3,1,1,1,1,1,1,1,1,5,1,1,1,1,1,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,5,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 3 && @set == 2) { setarray .@itemIDjob[1],12029,2357,2115,2524,5170,1231,1705,5293,2701,2701,2423,5325,5377,4064,4133,4103,4031,4105,4035,4092,4058,657,12118,12119,12120,12121,12012,12008,12183,12010,12092; setarray .@itemNBjob[1],10,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,3,2,1,5,1,1,1,1,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,5,10,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Paladin //================================================= if(@job == 4 && @set == 1) { setarray .@itemIDjob[1],2130,2364,2524,5374,1425,2423,2789,1127,5068,4141,4031,4058,4079,4337,4334,4035,4072,4079,657,606; setarray .@itemNBjob[1],1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,3,1,1,5,10; setarray .@itemREjob[1],7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 4 && @set == 2) { setarray .@itemIDjob[1],2537,2375,2138,2433,1228,13410,5137,5074,2291,2729,4103,4044,4031,4058,4105,4097,4133,4402,657,12118,12119,12120,12121,4127; setarray .@itemNBjob[1],1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,5,1,1,1,1,1; setarray .@itemREjob[1],5,5,7,5,5,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Sniper //================================================= if(@job == 5 && @set == 1) { setarray .@itemIDjob[1],2115,2537,2319,2433,1228,1705,5170,2701,2701,5325,5377,4133,4105,4044,4064,4035,4107,4076,4055,4058,4381,1065,12012,12008,12183,12010,656,12118,12119,12120,12121; setarray .@itemNBjob[1],1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,1,1,50,1,1,1,1,5,1,1,1,1; setarray .@itemREjob[1],7,7,7,7,5,10,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 5 && @set == 2) { setarray .@itemIDjob[1],14565,12060,2553,2399,2138,1738,1208,2440,5374,5325,2661,2749,4375,4401,4002,4072,4097,4027,4064,4058,1065,12012,12008,12183,12010,656,12118,12119,12120,12121; setarray .@itemNBjob[1],2,2,1,1,1,1,1,1,1,1,1,1,1,1,3,1,1,2,2,1,50,1,1,1,1,5,1,1,1,1; setarray .@itemREjob[1],0,0,9,7,7,5,10,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Creator //================================================= if(@job == 6 && @set == 1) { setarray .@itemIDjob[1],7142,7136,7135,7137,12063,12029,2123,2554,5170,1231,1208,5325,2423,2318,2701,2701,2659,4141,4031,4058,4027,4315,4334,4072,4368,4002,657,12118,12119,12120,12121; setarray .@itemNBjob[1],2,15,15,15,3,10,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,5,1,1,1,1; setarray .@itemREjob[1],0,0,0,0,0,0,7,7,7,5,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 6 && @set == 2) { setarray .@itemIDjob[1],7142,7136,7135,7137,2537,2433,2124,5293,5288,13414,2702,2701,4105,4133,4058,4097,4103,4064,4002,4368,657,12118,12119,12120,12121,2318,12065; setarray .@itemNBjob[1],2,15,15,15,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,5,1,1,1,1,1,1; setarray .@itemREjob[1],0,0,0,0,7,7,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,7,0;} //================================================= //Whitesmith //================================================= if(@job == 7 && @set == 1) { set zeny,zeny+1000000; setarray .@itemIDjob[1],2553,2115,2399,5374,1377,13017,2423,5325,5361,5068,2789,2661,4141,4079,4103,4107,4334,4368,4281,4225,4002,657,12118,12119,12120,12121,4058; setarray .@itemNBjob[1],1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,5,1,1,1,1,1; setarray .@itemREjob[1],7,7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 7 && @set == 2) { set zeny,zeny+1000000; setarray .@itemIDjob[1],12030,2375,2537,2433,2124,5592,1309,1387,5170,2789,2729,2702,4031,4058,4097,4044,4079,4133,4368,4281,657,12118,12119,12120,12121; setarray .@itemNBjob[1],5,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,2,4,5,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,3,9,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Clown / Gypsy //================================================= if(@job == 8 && @set == 1 && sex == 0) { setarray .@itemIDjob[1],12065,1980,1981,2115,2524,2357,5170,1978,1980,3525,2615,2701,2701,4105,4031,4058,4035,4133,4092,4072,4002,4064,4044,4107,645,12012,12008,12183,12010,12118,12119,12120,12121,2421; setarray .@itemNBjob[1],2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,2,1,2,2,1,1,5,1,1,1,1,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,7;} if(@job == 8 && @set == 1 && sex == 1) { setarray .@itemIDjob[1],12065,1980,1981,2115,2524,2357,5170,1925,1923,3525,2615,2701,2701,4105,4031,4058,4035,4133,4092,4072,4002,4064,4044,4107,645,12012,12008,12183,12010,12118,12119,12120,12121,2421; setarray .@itemNBjob[1],2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,2,1,2,2,1,1,5,1,1,1,1,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,7,7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,7;} if(@job == 8 && @set == 2 && sex == 0) { setarray .@itemIDjob[1],12065,1980,1981,1924,1978,5293,1980,2539,2436,2381,2138,2679,2678,4141,4194,4058,4334,645,12012,12008,12183,12010,12118,12119,12120,12121,4107,5592; setarray .@itemNBjob[1],2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,5,1,1,1,1,1,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,5,5,7,7,7,7,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3;} if(@job == 8 && @set == 2 && sex == 1) { setarray .@itemIDjob[1],12065,1980,1981,1924,1228,5293,1920,2539,2436,2381,2138,2679,2678,4141,4194,4058,4334,645,12012,12008,12183,12010,12118,12119,12120,12121,5592; setarray .@itemNBjob[1],2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,5,1,1,1,1,1,1,1,1,1; setarray .@itemREjob[1],0,7,7,5,5,7,7,7,7,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3;} //================================================= //High Priest //================================================= if(@job == 9 && @set == 1) { setarray .@itemIDjob[1],12029,2138,5170,2433,2537,2319,2374,1618,2729,1602,4002,4004,4334,2615,4105,4031,4058,4044,4107,4077,4064,5074,717,12118,12119,12120,12121; setarray .@itemNBjob[1],10,1,1,1,1,1,1,1,1,1,4,2,1,2,1,1,1,1,1,1,2,1,50,5,5,5,5; setarray .@itemREjob[1],0,7,7,7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 9 && @set == 2) { setarray .@itemIDjob[1],12029,2123,5124,2115,2353,2554,5170,1626,1618,2423,2701,2701,4031,5362,5325,4315,4293,4044,4064,4133,4058,717,12118,12119,12120,12121; setarray .@itemNBjob[1],10,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,50,5,5,5,5; setarray .@itemREjob[1],0,7,7,7,7,7,7,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //High Wizard //================================================= if(@job == 10 && @set == 1) { setarray .@itemIDjob[1],12065,12029,2123,5293,2374,2537,2433,1618,1626,5421,2701,2131,4381,4194,4031,4044,4064,4133,4058,717,716,715,12118,12119,12120,12121,4004; setarray .@itemNBjob[1],2,10,1,1,1,1,1,1,1,1,2,1,1,1,1,1,2,1,1,40,20,20,5,5,5,5,1; setarray .@itemREjob[1],0,0,7,7,7,7,7,5,5,0,0,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 10 && @set == 2) { setarray .@itemIDjob[1],12065,12029,2115,5170,2539,2436,2379,1632,5421,2701,2701,4058,4334,4044,4064,4315,4107,717,716,715,12118,12119,12120,12121; setarray .@itemNBjob[1],2,10,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,40,20,20,5,5,5,5; setarray .@itemREjob[1],0,0,7,7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Assassin Cross //================================================= if(@job == 11 && @set == 1) { setarray .@itemIDjob[1],678,2115,2524,2421,2357,5170,1266,1265,13033,2621,2621,5068,4058,4105,4031,4079,4019,4334,2615,4035,4072,656,716,12118,12119,12120,12121,4107; setarray .@itemNBjob[1],15,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,5,20,5,5,5,5,1; setarray .@itemREjob[1],0,7,7,7,7,7,7,7,5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 11 && @set == 2) { setarray .@itemIDjob[1],678,15000,2506,2450,1279,2124,31027,5137,2789,2702,4031,4337,4079,4411,4103,4035,4092,4334,4058,656,716,12118,12119,12120,12121; setarray .@itemNBjob[1],15,1,1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,1,5,20,5,5,5,5; setarray .@itemREjob[1],0,7,7,7,5,0,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 11 && @set == 3) { setarray .@itemIDjob[1],4058,4051,4281,4092,4035,4079,4102,4133,4141,13404,13033,5325,5374,1280,5170,2702,2625,2023,2124,2553,2399,678,656,716,12118,12119,12120,12121; setarray .@itemNBjob[1],1,1,2,1,2,2,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,15,5,20,5,5,5,5; setarray .@itemREjob[1],0,0,0,0,0,0,0,0,0,6,7,0,7,5,7,0,0,0,7,7,7,0,0,0,0,0,0,0;} //================================================= //Champion //================================================= if(@job == 12 && @set == 1) { setarray .@itemIDjob[1],12029,2123,2357,2537,2433,5170,1542,1532,2701,2701,5361,5325,4058,4133,4107,4064,4035,4105,4031,4044,656,12118,12119,12120,12121; setarray .@itemNBjob[1],10,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,1,1,1,5,5,5,5,5; setarray .@itemREjob[1],0,7,7,7,7,7,7,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} if(@job == 12 && @set == 2) { setarray .@itemIDjob[1],12029,2124,2554,2553,2399,2374,1824,1544,2423,2729,2702,5137,5421,4058,4141,4044,4035,4102,4112,656,12118,12119,12120,12121; setarray .@itemNBjob[1],10,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,5,5,5,5,5; setarray .@itemREjob[1],0,7,7,7,7,7,5,7,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;} //================================================= //Items //================================================= set @sizearray, getarraysize(.@itemIDjob); for( set .@i, 1; .@i <= @sizearray; set .@i, .@i +1 ) { set @rand, rand(1,99); if (@rand < $BR_rand) { getitem2 .@itemIDjob[.@i],.@itemNBjob[.@i],1,.@itemREjob[.@i],0,0,0,0,0;} } //Other Pots setarray .@itemIDjob2[1],504,505,616,12033; setarray .@itemNBjob2[1],40,20,5,5; for( set .@i, 1; .@i <= 4; set .@i, .@i +1 ) { set @rand, rand(1,99); if (@rand < $BR_rand) { getitem .@itemIDjob2[.@i],.@itemNBjob2[.@i];} } //Soins percentheal 100,100; //Style //hair style set @hstyle, rand (0,$BR_Hsty); setlook 1,@hstyle; //hair color set @hcolor, rand (0,$BR_Hcolor); setlook 6,@hcolor; //cloth color set @ccolor, rand (0,$BR_Ccolor); setlook 7,@ccolor; //Retour return; } //================================================= //BR Langue //================================================= // Assistante BR //================================================= function script br_fr01 { mes "[" + @name$ + "]"; mes "• La Battle Royale est :"; if ($BR_Progress == 0) { mes "^FF3300 Désactivée^000000";} if ($BR_Progress == 1) { mes "^33CC00En phase d'inscription.^000000";} if ($BR_Progress == 2) { mes "^33CC00En phase d'équipement.^000000";} if ($BR_Progress == 3) { mes "^33CC00En phase de Combat.^000000";} if ($BR_Progress == 4) { mes "^33CC00En phase de Récompense.^000000";} if ($BR_PvP == 0) { mes "• La BR-PvP est ^FF3300 Désactivée^000000"; } if ($BR_PvP == 1) { mes "• La BR-PvP est ^66FF33 Activée^000000 ["+getmapusers("br_pvp")+"] personne(s) présente(s)"; } mes "Que puis-je pour toi, "+((Sex)?"^66CCFF" + strcharinfo(0) + "^000000":"^FF00CC" + strcharinfo(0) + "^000000")+" ?"; next; switch( select("•Participer:•Statistiques:•Récompenses:•Language:•Quitter:•[GM] Menu") ) { //============================== case 1: mes "[" + @name$ + "]"; mes "Je vais tout d'abord vérifier que vous avez les pré-requis nécessaires."; mes "Vous devez être un novice 1/1 avec aucun objet sur vous, ni être dans une guilde !"; next; if (BaseLevel == 1 && Joblevel == 1 && Weight == 0 && strcharinfo(2) != "0" && getpetinfo(2) == "null") { mes "[" + @name$ + "]"; mes "Parfait, les conditions sont remplies ! Veuillez me suivre !"; close2; warp "br_main",103,58; end;} mes "[" + @name$ + "]"; mes "Je suis désolée, mais vous n'avez pas les conditions requises."; mes "Pensez à supprimer les objets dans votre inventaire."; close; //============================== case 2: mes "[" + @name$ + "]"; mes "Voici les statistiques de la Battle Royale :"; close2; callfunc "BR_stats"; end; //============================== case 3: callfunc "BR_prize"; end; //============================== case 4: mes "[" + @name$ + "]"; mes "Please choose your language :"; mes "Veuillez choisir votre langue :"; next; switch( select("•Français:•English") ) { case 1: set BR_Langue,0; break; case 2: set BR_Langue,1; break; mes "[" + @name$ + "]"; mes "Modification apply"; mes "Modification aplliquée."; close; } close; //============================== case 5: close; //============================== case 6: if (getgmlevel() < $GM_Minlvl) { mes "[" + @name$ + "]"; mes "Cette action est réservée aux GM."; close;} mes "[" + @name$ + "]"; mes "Le Rate drop est actuellement à [^33CC00"+$BR_rand+"^000000]."; mes "Que puis-je pour vous ?"; next; switch( select("•Rates:•Lancer BR-Classique:•Lancer BR-TvT:•BR-PvP:•Réinitialiser Stats:•Choix de Langue:•Quitter") ){ case 1: mes "[" + @name$ + "]"; mes "Quelle valeur voulez-vous pour le taux de chance d'obtenir un objet ?"; mes "Elle est actuellement à [^33CC00"+$BR_rand+"^000000]"; next; input @number; if (@number >= 0 && @number <= 100) { set $BR_rand,@number; mes "[" + @name$ + "]"; mes "Le taux de drop est désormais de [^33CC00"+$BR_rand+"^000000]"; close;} mes "[" + @name$ + "]"; mes "Vous devez rentrer une valeur."; close; case 2: set $BR_Mod,1; //PvP break; case 3: set $BR_Mod,2; //TvT break; case 4: mes "[" + @name$ + "]"; if ($BR_PvP == 0) { mes "La BR-PvP est ^FF3300 Désactivé^000000"; } if ($BR_PvP == 1) { mes "La BR-PvP est ^66FF33 Activé^000000"; } mes "Que voulez-vous faire ?"; next; if( select("•Activer:•Désactivé") == 2 ) { mes "[" + @name$ + "]"; mes "La BR-PvP est ^FF3300 Désactivé^000000."; close2; announce "Battle Royale : La BR-PvP est désactivée, vous ne pouvez plus vous y inscrire !",bc_all,0xffff40 ; set $BR_PvP,0; end; } mes "[" + @name$ + "]"; mes "La BR-PvP est ^66FF33 Activé^000000."; close2; announce "Battle Royale : La BR-PvP est activée, vous pouvez vous y inscrire !",bc_all,0xffff40 ; set $BR_PvP,1; donpcevent "BR-PvP#ep1::OnDelete"; end; case 5: mes "[" + @name$ + "]"; mes "Quelles statistiques voulez-vous supprimer ?"; switch( select("•BR Classique:•BR-PvP:•Quitter") ){ case 1: set @choice,1; break; case 2: set @choice,2; break; case 3: close; } mes "[" + @name$ + "]"; mes "Attention toutes les données vont être supprimées !"; mes "Êtes-vous sûr ?"; next; if( select("•Oui:•Non") == 2 ) close; mes "[" + @name$ + "]"; mes "Opération en cours !"; close2; if (@choice == 1) { query_sql("UPDATE `char` SET `BR_Round` = 0,`BR_Kill` = 0,`BR_Death` = 0,`BR_Gold` = 0,`BR_Silver` = 0,`BR_Bronze` = 0,`BR_Prize` = 0");} if (@choice == 2) { query_sql("UPDATE `char` SET `BR_PDeath` = 0,`BR_PKill` = 0"); } end; case 6: mes "[" + @name$ + "]"; mes "Quel langue voulez-vous activer ?"; next; if( select("•Français:•English") == 2 ) { mes "[" + @name$ + "]"; mes "Now the Battle Royale will be display in english."; close2; set $BR_Langue,1; end; } mes "[" + @name$ + "]"; mes "La Battle Royale va être en français désormais."; close2; set $BR_Langue,0; end; case 7: close; } if ($BR_Progress > 0) { mes "[" + @name$ + "]"; mes "La Battle Royale est en cours, vous ne pouvez pas la lancer à nouveau."; close;} mes "[" + @name$ + "]"; mes "Voulez-vous lancer la BR ?"; next; if( select("•Oui:•Non") == 2 ) close; mes "[" + @name$ + "]"; mes "Bien, je vais faire les annonces pour vous !"; close2; donpcevent "BR_Core::OnStart"; end; } } //======================================================= function script br_en01 { mes "[" + @name$ + "]"; mes "• The Battle Royale is currently :"; if ($BR_Progress == 0) { mes "^FF3300 Disable^000000";} if ($BR_Progress == 1) { mes "^33CC00Registration phase.^000000";} if ($BR_Progress == 2) { mes "^33CC00Equipements phase.^000000";} if ($BR_Progress == 3) { mes "^33CC00Fight phase.^000000";} if ($BR_Progress == 4) { mes "^33CC00Reward phase.^000000";} if ($BR_PvP == 0) { mes "• BR-PvP is ^FF3300 Disable^000000"; } if ($BR_PvP == 1) { mes "• BR-PvP is ^66FF33 Activiate^000000 ["+getmapusers("br_pvp")+"] person(s)"; } mes "What can I do for you, "+((Sex)?"^66CCFF" + strcharinfo(0) + "^000000":"^FF00CC" + strcharinfo(0) + "^000000")+" ?"; next; switch( select("•Participate:•Statistiques:•Rewards:•Choose Language:•Leave:•[GM] Menu") ) { //============================== case 1: mes "[" + @name$ + "]"; mes "I'll verify if you got all pre-requisites."; mes "You must have a novice 1/1 without any object or guild."; next; if (BaseLevel == 1 && Joblevel == 1 && Weight == 0 && strcharinfo(2) != "0" && getpetinfo(2) == "null") { mes "[" + @name$ + "]"; mes "Perfect, follow me."; close2; warp "br_main",103,58; end;} mes "[" + @name$ + "]"; mes "I'm sorry, you don't respect conditions for register."; mes "Suppress all items in your inventory."; close; //============================== case 2: mes "[" + @name$ + "]"; mes "Here the statistiques :"; close2; callfunc "BR_stats"; end; //============================== case 3: callfunc "BR_prize"; end; //============================== case 4: mes "[" + @name$ + "]"; mes "Please choose your language :"; mes "Veuillez choisir votre langue :"; next; switch( select("•Français:•English") ) { case 1: set BR_Langue,0; break; case 2: set BR_Langue,1; break; mes "[" + @name$ + "]"; mes "Modification apply"; mes "Modification aplliquée."; close; } close; //============================== case 5: close; //============================== case 6: if (getgmlevel() < $GM_Minlvl) { mes "[" + @name$ + "]"; mes "This action is reserved to GM."; close;} mes "[" + @name$ + "]"; mes "Drop rate is actually at [^33CC00"+$BR_rand+"^000000]."; mes "What can I do for you ?"; next; switch( select("•Rates:•Launch BR-Classic:•Launch BR-TvT:•BR-PvP:•Reset Stats:•Language:•Leave") ){ case 1: mes "[" + @name$ + "]"; mes "What value do you want for drop item rate ?"; mes "Its actually at [^33CC00"+$BR_rand+"^000000]"; next; input @number; if (@number >= 0 && @number <= 100) { set $BR_rand,@number; mes "[" + @name$ + "]"; mes "Now the drop rate is at [^33CC00"+$BR_rand+"^000000]"; close;} mes "[" + @name$ + "]"; mes "You must enter a value."; close; case 2: set $BR_Mod,1; //PvP break; case 3: set $BR_Mod,2; //TvT break; case 4: mes "[" + @name$ + "]"; if ($BR_PvP == 0) { mes "BR-PvP is ^FF3300 Desactivate^000000"; } if ($BR_PvP == 1) { mes "BR-PvP is ^66FF33 Activate^000000"; } mes "What can I do for you ?"; next; if( select("•Activate:•Disable") == 2 ) { mes "[" + @name$ + "]"; mes "BR-PvP is ^FF3300 Disable^000000."; close2; announce "Battle Royale : BR-PvP is now disable, you can't register anymore !",bc_all,0xffff40 ; set $BR_PvP,0; end; } mes "[" + @name$ + "]"; mes "BR-PvP is ^66FF33 Active^000000."; close2; announce "Battle Royale : BR-PvP is activate, you can register !",bc_all,0xffff40 ; set $BR_PvP,1; donpcevent "BR-PvP#ep1::OnDelete"; end; case 5: mes "[" + @name$ + "]"; mes "What stats do you want to delete ?"; switch( select("•BR Classic:•BR-PvP:•Leave") ){ case 1: set @choice,1; break; case 2: set @choice,2; break; case 3: close; } mes "[" + @name$ + "]"; mes "Becareful all data will be deleted !"; mes "Are you sure ?"; next; if( select("•Yes:•No") == 2 ) close; mes "[" + @name$ + "]"; mes "Operation in progress !"; close2; if (@choice == 1) { query_sql("UPDATE `char` SET `BR_Round` = 0,`BR_Kill` = 0,`BR_Death` = 0,`BR_Gold` = 0,`BR_Silver` = 0,`BR_Bronze` = 0,`BR_Prize` = 0");} if (@choice == 2) { query_sql("UPDATE `char` SET `BR_PDeath` = 0,`BR_PKill` = 0"); } end; case 6: mes "[" + @name$ + "]"; mes "Which language would you set ?"; next; if( select("•Français:•English") == 2 ) { mes "[" + @name$ + "]"; mes "Now the Battle Royale will be display in english."; close2; set $BR_Langue,1; end; } mes "[" + @name$ + "]"; mes "La Battle Royale va être en français désormais."; close2; set $BR_Langue,0; end; case 7: close; } if ($BR_Progress > 0) { mes "[" + @name$ + "]"; mes "Battle Royale in progress."; close;} mes "[" + @name$ + "]"; mes "Do you want to launch the BR ?"; next; if( select("•Yes:•No") == 2 ) close; mes "[" + @name$ + "]"; mes "I'll make announces for you !"; close2; donpcevent "BR_Core::OnStart"; end; } } //================================================= // Assistante BR //================================================= function script br_fr02 { getmapxy @map$,@x,@y,0; if ($BR_Progress == 2 || @map$ == "br_main") { percentheal 100,100; } mes "[" + @name$ + "]"; mes "Je peux vous redonner vos points de vie durant la préparation, ainsi que les skills platinum."; mes "Voyons voir ... Vous avez besoin de :"; next; switch( select("•Reset Skills:•Reset Stats:•Deslot:•Divers et Platinum") ) { case 1: mes "[" + @name$ + "]"; mes "Et voici vos skills ont été réinitialisés !"; close2; ResetSkill; end; case 2: mes "[" + @name$ + "]"; mes "Et voici vos stats ont été réinitialisés !"; close2; ResetStatus; end; case 3: mes "[" + @name$ + "]"; mes "Quel objet voulez-vous desloter ?"; next; set .@Menu$, ""; for( set .@i, 1; .@i < 10; set .@i, .@i +1 ) { set .@Menu$, .@Menu$ + getequipname(.@i) + ":";} set @choice,select(.@Menu$); if(getequipcardcnt(@choice) == 0) { mes "[" + @name$ + "]"; mes "Vous n'avez pas de carte dans cet équipement."; close; } successremovecards @choice; mes "[" + @name$ + "]"; mes "L'opération s'est correctement déroulée."; close; case 4: mes "[" + @name$ + "]"; callfunc "BR_Skill"; if (BaseClass == Job_Swordman && checkriding() == 0 && getskilllv(63)==1) { mes "D'un Peco-Peco !"; close2; setriding; end;} if (BaseClass == Job_Archer && checkfalcon() == 0 && getskilllv(127)==1) { mes "D'un Faucon !"; close2; setfalcon; end;} if(BaseClass == Job_Merchant && checkcart() == 0 && getskilllv(39)>0) { mes "D'un Chariot !"; close2; setcart; end;} if( BaseJob == Job_Alchemist && gethominfo(0) == 0 && gethominfo(6) != 99 && @inuse == 0) { mes "D'un Homunculus !"; close2; set @homun, rand(6009,6016); atcommand ""+$BR_Atcom$+"makehomun "+@homun+""; atcommand ""+$BR_Atcom$+"homfriendly 150"; sleep2 500; atcommand ""+$BR_Atcom$+"homlvl 99"; homshuffle; set @inuse,1; end;} if(BaseClass == Job_Merchant) { mes "De pierres pour votre chariot !"; close2; getitem 7049,500; //Stones end; } mes "De rien ! N'oubliez pas de mettre vos skills avant de venir me voir. Je m'occupe aussi des homunculus."; close; } } //============================================ function script br_en02 { getmapxy @map$,@x,@y,0; if ($BR_Progress == 2 || @map$ == "br_main") { percentheal 100,100; } mes "[" + @name$ + "]"; mes "I can give you your HP and SP during the preparation, and skills platinum."; mes "Let's see, you need :"; next; switch( select("•Reset Skills:•Reset Stats:•Deslot:•Misc and Platinum") ) { case 1: mes "[" + @name$ + "]"; mes "Your skills have been reseted !"; close2; ResetSkill; end; case 2: mes "[" + @name$ + "]"; mes "Your stats habe been reseted !"; close2; ResetStatus; end; case 3: mes "[" + @name$ + "]"; mes "What kind of object do you want deslot ?"; next; set .@Menu$, ""; for( set .@i, 1; .@i < 10; set .@i, .@i +1 ) { set .@Menu$, .@Menu$ + getequipname(.@i) + ":";} set @choice,select(.@Menu$); if(getequipcardcnt(@choice) == 0) { mes "[" + @name$ + "]"; mes "You don't have cards in this equipement."; close; } successremovecards @choice; mes "[" + @name$ + "]"; mes "The operation is a success."; close; case 4: mes "[" + @name$ + "]"; callfunc "BR_Skill"; if (BaseClass == Job_Swordman && checkriding() == 0 && getskilllv(63)==1) { mes "A Peco-Peco !"; close2; setriding; end;} if (BaseClass == Job_Archer && checkfalcon() == 0 && getskilllv(127)==1) { mes "A Falcon !"; close2; setfalcon; end;} if(BaseClass == Job_Merchant && checkcart() == 0 && getskilllv(39)>0) { mes "A Cart !"; close2; setcart; end;} if( BaseJob == Job_Alchemist && gethominfo(0) == 0 && gethominfo(6) != 99 && @inuse == 0) { mes "A Homunculus !"; close2; set @homun, rand(6009,6016); atcommand ""+$BR_Atcom$+"makehomun "+@homun+""; atcommand ""+$BR_Atcom$+"homfriendly 150"; sleep2 500; atcommand ""+$BR_Atcom$+"homlvl 99"; homshuffle; set @inuse,1; end;} if(BaseClass == Job_Merchant) { mes "Stones for your carts !"; close2; getitem 7049,500; //Stones end; } mes "You're welcome ! Don't forget to put your skills before talking to me. I can also give you homunculus."; close; } } //================================================= // Prize function //================================================= function script br_fr03 { if (@tempR == 1) { mes "[" + @name$ + "]"; mes "Vous devez vous déconnecter pour pouvoir utiliser ce service à nouveau !"; close; } set .@b,getcharid(3); //compte id query_sql("select `char_id`,`BR_prize` from `char` WHERE `account_id` = '"+.@b+"'",.@countA,.@countB); set @size, getarraysize (.@countA); for( set .@i, 0; .@i < @size; set .@i, .@i +1 ) { if (.@countB[.@i] != 0) { set @char,.@countA[.@i]; set @points,.@countB[.@i]; } } mes "[" + @name$ + "]"; mes "Vous pouvez retirer vos récompenses ici !"; mes "Vous gagnez des prix en fonction du nombre de médailles et de victoires remportées."; mes "Vous avez pour le moment : [^33CC00"+@points+"^000000] points à utiliser !"; next; switch( select("•Retirer un Prix:•Grands Prix:•Quitter") ) { case 1: if (@points == 0) { mes "[" + @name$ + "]"; mes "Vous n'avez aucun point à retirer !"; close; } mes "[" + @name$ + "]"; mes "Voulez-vous échanger vos [^33CC00"+@points+"^000000] points contre des : ^33CC00"+getitemname($BR_Recomp)+"^000000 ?"; next; if( select("Oui:Non") == 2 ) close; mes "[" + @name$ + "]"; mes "Parfait alors voici vos ^33CC00["+@points+"] "+getitemname($BR_Recomp)+"^000000 !"; close2; query_sql "UPDATE `char` SET `BR_prize` = '0' WHERE `char_id` ='"+@char+"'"; getitem $BR_Recomp,@points; set @tempR,1; end; case 2: mes "[" + @name$ + "]"; mes "Ceci n'est pas encore implanté."; close; case 3: close; } } //================================================= function script br_en03 { if (@tempR == 1) { mes "[" + @name$ + "]"; mes "You must log out for use this service again."; close; } set .@b,getcharid(3); //compte id query_sql("select `char_id`,`BR_prize` from `char` WHERE `account_id` = '"+.@b+"'",.@countA,.@countB); set @size, getarraysize (.@countA); for( set .@i, 0; .@i < @size; set .@i, .@i +1 ) { if (.@countB[.@i] != 0) { set @char,.@countA[.@i]; set @points,.@countB[.@i]; } } mes "[" + @name$ + "]"; mes "You can get your reward here."; mes "You can earn prices, medals at each game."; mes "You already have : [^33CC00"+@points+"^000000] points to use !"; next; switch( select("•Get a reward:•Specific Rewards:•Leave") ) { case 1: if (@points == 0) { mes "[" + @name$ + "]"; mes "You didn't have any points !"; close; } mes "[" + @name$ + "]"; mes "Would you exchange [^33CC00"+@points+"^000000] points for : ^33CC00"+getitemname($BR_Recomp)+"^000000 ?"; next; if( select("Yes:No") == 2 ) close; mes "[" + @name$ + "]"; mes "Perfect, here your ^33CC00["+@points+"] "+getitemname($BR_Recomp)+"^000000 !"; close2; query_sql "UPDATE `char` SET `BR_prize` = '0' WHERE `char_id` ='"+@char+"'"; getitem $BR_Recomp,@points; set @tempR,1; end; case 2: mes "[" + @name$ + "]"; mes "This not enabled yet."; close; case 3: close; } } //================================================= function script br_fr04 { mes "[" + @name$ + "]"; mes "Quel classement voulez vous consulter ?"; next; switch( select("•BR Classique:•BR PvP:•Médailles:•Quitter") ) { case 1: close2; set @choice,1; break; case 2: close2; set @choice,2; break; case 3: close2; set @choice,3; break; case 4: close; } if (@choice == 1) { query_sql("select name,BR_Round,BR_Kill,BR_Death from `char` ORDER BY BR_Kill DESC LIMIT 50", @player$, @round, @kill, @death); } if (@choice == 2) { query_sql("select name,BR_PKill,BR_PDeath from `char` ORDER BY BR_PKill DESC LIMIT 50", @player$, @pkill, @pdeath); } if (@choice == 3) { query_sql("select name,BR_Gold,BR_Silver,BR_Bronze from `char` ORDER BY BR_Gold DESC LIMIT 50", @player$, @gold, @silver, @bronze); } for( set .@i, 0; .@i < 50; set .@i, .@i +1 ) { if (@choice == 1) { dispbottom ""+(.@i+1)+" - "+@player$[.@i]+" - Round: "+@round[.@i]+" - Kill: "+@kill[.@i]+" Death: "+@death[.@i]+""; } if (@choice == 2) { dispbottom ""+(.@i+1)+" - "+@player$[.@i]+" - Kill: "+@pkill[.@i]+" Death: "+@pdeath[.@i]+""; } if (@choice == 3) { dispbottom ""+(.@i+1)+" Les Médailles - Gold: "+@gold[.@i]+" Silver: "+@silver[.@i]+" Bronze: "+@bronze[.@i]+"";} } end; } //================================================= function script br_en04 { mes "[" + @name$ + "]"; mes "What ladder do you want to see ?"; next; switch( select("•BR Classic:•BR PvP:•Medals:•Leave") ) { case 1: close2; set @choice,1; break; case 2: close2; set @choice,2; break; case 3: close2; set @choice,3; break; case 4: close; } if (@choice == 1) { query_sql("select name,BR_Round,BR_Kill,BR_Death from `char` ORDER BY BR_Kill DESC LIMIT 50", @player$, @round, @kill, @death); } if (@choice == 2) { query_sql("select name,BR_PKill,BR_PDeath from `char` ORDER BY BR_PKill DESC LIMIT 50", @player$, @pkill, @pdeath); } if (@choice == 3) { query_sql("select name,BR_Gold,BR_Silver,BR_Bronze from `char` ORDER BY BR_Gold DESC LIMIT 50", @player$, @gold, @silver, @bronze); } for( set .@i, 0; .@i < 50; set .@i, .@i +1 ) { if (@choice == 1) { dispbottom ""+(.@i+1)+" - "+@player$[.@i]+" - Round: "+@round[.@i]+" - Kill: "+@kill[.@i]+" Death: "+@death[.@i]+""; } if (@choice == 2) { dispbottom ""+(.@i+1)+" - "+@player$[.@i]+" - Kill: "+@pkill[.@i]+" Death: "+@pdeath[.@i]+""; } if (@choice == 3) { dispbottom ""+(.@i+1)+" Medals - Gold: "+@gold[.@i]+" Silver: "+@silver[.@i]+" Bronze: "+@bronze[.@i]+"";} } end; } Screen Shot
  18. How to fix this debug from aerie custom episode / battle royal and WingsOfGaia script
  19. about aura set commands \src\map\clif.h(748): warning C4028: formal parameter 2 different from declaration src\map\clif.c(8454): error C2084: function 'void clif_sendauras(map_session_data *,send_target)' already has a body src\map\clif.h(701) : see previous definition of 'clif_sendauras' src\map\clif.c(8475): error C2084: function 'void clif_sendaurastoone(map_session_data *,map_session_data *)' already has a body src\map\clif.h(749) : see previous definition of 'clif_sendaurastoone' clif.c /*========================================== * Aura System *------------------------------------------*/ void clif_sendauras( struct map_session_data *sd, int target ) { int effect1; int effect2; effect1 = sd->status.aura1; effect2 = sd->status.aura2; if (sd->status.option & OPTION_HIDE) return; if (effect1 > 0) clif_specialeffect(&sd->bl, effect1, target); if (effect2 > 0) clif_specialeffect(&sd->bl, effect2, target); } clif.h // Aura System int clif_specialeffecttoone(struct block_list *bl, struct block_list *dst, int type); void clif_sendauras( struct map_session_data *sd, int target ); void clif_sendaurastoone(struct map_session_data *sd, struct map_session_data *dsd); void clif_getareachar_char2(struct map_session_data* sd,struct block_list *bl); int clif_insight2(struct block_list *bl,va_list ap); what is wrong with the target??
×
×
  • Create New...