to active the menu, its ctrl f
bindCommand(keyboard0, make, control, "f", TO, "Menu::Display(PCRPGMain);");
function WeaponInfo(%item){say(0, "#w " @ %item);}
$SmithCombo[1] = "Keldrinite 1 LongSword 1"; $smithcomboresult[1] = "KeldriniteLS";
$SmithCombo[2] = "ElvenBow 1 CompositeBow 1 Quartz 3"; $SmithComboResult[2] = "AeolusWing";
$SmithCombo[3] = "SmallRock 1 Quartz 1"; $SmithComboResult[3] = "StoneFeather";
$SmithCombo[4] = "Knife 1 Quartz 1"; $SmithComboResult[4] = "MetalFeather";
$SmithCombo[5] = "Dagger 1 Quartz 1 Granite 2"; $SmithComboResult[5] = "Talon";
$SmithCombo[6] = "Dagger 2 Jade 2 Quartz 4"; $SmithComboResult[6] = "CeraphumsFeather";
$SmithCombo[7] = "Club 1 SkeletonBone 1 Granite 3"; $SmithComboResult[7] = "BoneClub";
$SmithCombo[8] = "SpikedClub 1 SkeletonBone 2 Granite 5"; $SmithComboResult[8] = "SpikedBoneClub";
$SmithCombo[9] = "LightRobe 1 ApprenticeRobe 1 EnchantedStone 5"; $SmithComboResult[9] = "FineRobe";
$SmithCombo[10] = "Keldrinite 2 FullPlateArmor 1 Gold 5 Emerald 5 Diamond 5 EnchantedStone 5"; $SmithComboResult[10] = "KeldrinArmor";
$SmithCombo[11] = "DragonScale 5 Diamond 5 Ruby 3"; $SmithComboResult[11] = "DragonMail";
$SmithCombo[12] = "DragonScale 3 Ruby 2"; $SmithComboResult[12] = "DragonShield";
$SmithCombo[13] = "AdvisorRobe 1 Topaz 2 EnchantedStone 4"; $SmithComboResult[13] = "ElvinRobe";
$SmithCombo[14] = "LongStaff 1 Granite 4 Turquoise 2"; $SmithComboResult[14] = "JusticeStaff";
$SmithCombo[15] = "FullPlateArmor 1 Titainium 300 Iron 10 Nickel 3 LeatherArmor 1"; $SmithComboResult[15] = "TriPlateArmor";
$SmithCombo[16] = "Iron 8 Nickel 5 LeatherArmor 1"; $SmithComboResult[16] = "SteelBandBoots";
$SmithCombo[17] = "Silver 5 Iron 1 LeatherArmor 1"; $SmithComboResult[17] = "SilvertoneBoots";
$SmithCombo[18] = "Silver 7 Iron 2 LeatherArmor 1"; $SmithComboResult[18] = "SilvertoneHelm";
$SmithCombo[19] = "Titanium 2 LeatherArmor 1"; $SmithComboResult[19] = "TitaniumBracedBoots";
$SmithCombo[20] = "Silver 4 Iron 1 LeatherArmor 1"; $SmithComboResult[20] = "SilvertoneBracers";
$SmithCombo[21] = "Silver 2 Iron 1 LeatherArmor 1"; $SmithComboResult[21] = "SilvertoneGauntlets";
$SmithCombo[22] = "Iron 1 Nickel 1 LeatherArmor 1"; $SmithComboResult[22] = "FingerlessGloves";
$SmithCombo[23] = "Claymore 1 Halberd 1 LeatherArmor 1"; $SmithComboResult[23] = "AnchetsSword";
function SmithComboCPA(%num){
Client::centerPrint("<jc><f2>"@ $SmithCombo[%num] @" = "@ $smithComboResult[%num], 1);
Schedule("Client::centerPrint(\"\", 1);", 5);
}
Menu::New(PCRPGMain, "PCRPG Main Menu");
Menu::AddChoice(PCRPGMain, "wWeapons Info", "Menu::Display(WeaponsInfoMenu);");
Menu::AddChoice(PCRPGMain, "mSpells Info", "Menu::Display(SpellsInfoMenu);");
Menu::AddChoice(PCRPGMain, "sSmithing Combos", "Menu::Display(SmithCombos);");
Menu::AddChoice(PCRPGMain, "aArmor Info", "Menu::Display(ArmorsInfoMenu);");
Menu::AddChoice(PCRPGMain, "rRobes Info", "Menu::Display(RobesInfoMenu);");
Menu::AddChoice(PCRPGMain, "gNew Accessories", "Menu::Display(SAInfoMenu);");
Menu::AddChoice(PCRPGMain, "bBow Ammunition", "Menu::Display(BowAmmoMenu);");
Menu::AddChoice(PCRPGMain, "qLeave Menu", "");
Menu::New(WeaponsInfoMenu, "Weapons Info Menu");
Menu::AddChoice(WeaponsInfoMenu, "sSlashing Weapons", "Menu::Display(WeaponsInfoSlashing);");
Menu::AddChoice(WeaponsInfoMenu, "pPercing Weapons", "Menu::Display(WeaponsInfoPercing);");
Menu::AddChoice(WeaponsInfoMenu, "bBludgeing Weapons", "Menu::Display(WeaponsInfoBludgeing);");
Menu::AddChoice(WeaponsInfoMenu, "aArchery Weapons", "Menu::Display(WeaponsInfoArchery);");
Menu::AddChoice(WeaponsInfoMenu, "rRusties", "Menu::Display(WeaponsInfoRusties);");
Menu::AddChoice(WeaponsInfoMenu, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(WeaponsInfoSlashing, "Slashing Weapons Info Menu");
Menu::AddChoice(WeaponsInfoSlashing, "1Hatchet", "WeaponInfo(hatchet);");
Menu::AddChoice(WeaponsInfoSlashing, "2Broad Sword", "WeaponInfo(broadsword);");
Menu::AddChoice(WeaponsInfoSlashing, "3War Axe", "WeaponInfo(waraxe);");
Menu::AddChoice(WeaponsInfoSlashing, "4Long Sword", "WeaponInfo(longsword);");
Menu::AddChoice(WeaponsInfoSlashing, "5Battle Axe", "WeaponInfo(battleaxe);");
Menu::AddChoice(WeaponsInfoSlashing, "6Bastard Sword", "WeaponInfo(bastardsword);");
Menu::AddChoice(WeaponsInfoSlashing, "7Halberd", "WeaponInfo(halberd);");
Menu::AddChoice(WeaponsInfoSlashing, "8Claymore", "WeaponInfo(Claymore);");
Menu::AddChoice(WeaponsInfoSlashing, "9Anchets Sword", "WeaponInfo(anchetssword);");
Menu::AddChoice(WeaponsInfoSlashing, "xWeapons Info Menu", "Menu::Display(WeaponsInfoMenu);");
Menu::New(WeaponsInfoPercing, "Percing Weapons Info Menu");
Menu::AddChoice(WeaponsInfoPercing, "1PickAxe", "WeaponInfo(PickAxe);");
Menu::AddChoice(WeaponsInfoPercing, "2Knife", "WeaponInfo(knife);");
Menu::AddChoice(WeaponsInfoPercing, "3Dagger", "WeaponInfo(dagger);");
Menu::AddChoice(WeaponsInfoPercing, "4Short Sword", "WeaponInfo(shortsword);");
Menu::AddChoice(WeaponsInfoPercing, "5Spear", "WeaponInfo(spear);");
Menu::AddChoice(WeaponsInfoPercing, "6Gladius", "WeaponInfo(gladius);");
Menu::AddChoice(WeaponsInfoPercing, "7Trident", "WeaponInfo(trident);");
Menu::AddChoice(WeaponsInfoPercing, "8Rapier", "WeaponInfo(rapier);");
Menu::AddChoice(WeaponsInfoPercing, "9Awl Pike", "WeaponInfo(awlpike);");
Menu::AddChoice(WeaponsInfoPercing, "xWeapons Info Menu", "Menu::Display(WeaponsInfoMenu);");
Menu::New(WeaponsInfoBludgeing, "Bludgeing Weapons Info Menu");
Menu::AddChoice(WeaponsInfoBludgeing, "1Club", "WeaponInfo(club);");
Menu::AddChoice(WeaponsInfoBludgeing, "2Bone Club", "WeaponInfo(boneclub);");
Menu::AddChoice(WeaponsInfoBludgeing, "3Spiked Club", "WeaponInfo(spikedclub);");
Menu::AddChoice(WeaponsInfoBludgeing, "4Mace", "WeaponInfo(mace);");
Menu::AddChoice(WeaponsInfoBludgeing, "5Hammer Pick", "WeaponInfo(hammerpick);");
Menu::AddChoice(WeaponsInfoBludgeing, "6Spiked Bone Club", "WeaponInfo(spikedboneclub);");
Menu::AddChoice(WeaponsInfoBludgeing, "7War Hammer", "WeaponInfo(warhammer);");
Menu::AddChoice(WeaponsInfoBludgeing, "8War Maul", "WeaponInfo(warmaul);");
Menu::AddChoice(WeaponsInfoBludgeing, "xWeapons Info Menu", "Menu::Display(WeaponsInfoMenu);");
Menu::New(WeaponsInfoArchery, "Archery Weapons Info Menu");
Menu::AddChoice(WeaponsInfoArchery, "1Sling", "WeaponInfo(sling);");
Menu::AddChoice(WeaponsInfoArchery, "2Short Bow", "WeaponInfo(shortbow);");
Menu::AddChoice(WeaponsInfoArchery, "3Light Crossbow", "WeaponInfo(lightcrossbow);");
Menu::AddChoice(WeaponsInfoArchery, "4Long Bow", "WeaponInfo(longbow);");
Menu::AddChoice(WeaponsInfoArchery, "5Composite Bow", "WeaponInfo(compositebow);");
Menu::AddChoice(WeaponsInfoArchery, "6Repeating Crossbow", "WeaponInfo(repeatingcrossbow);");
Menu::AddChoice(WeaponsInfoArchery, "7Elven Bow", "WeaponInfo(elvenbow);");
Menu::AddChoice(WeaponsInfoArchery, "8Kails Bow", "WeaponInfo(kailsbow);");
Menu::AddChoice(WeaponsInfoArchery, "9Aeolus Wing", "WeaponInfo(aeoluswing);");
Menu::AddChoice(WeaponsInfoArchery, "0Heavy Crossbow", "WeaponInfo(heavycrossbow);");
Menu::AddChoice(WeaponsInfoArchery, "xWeapons Info Menu", "Menu::Display(WeaponsInfoMenu);");
Menu::New(WeaponsInfoRusties, "Rusties Weapons Info Menu");
Menu::AddChoice(WeaponsInfoRusties, "1Rusty Knife", "WeaponInfo(rknife);");
Menu::AddChoice(WeaponsInfoRusties, "2Rusty BroadSword", "WeaponInfo(rbroadsword);");
Menu::AddChoice(WeaponsInfoRusties, "3Rusty LongSword", "WeaponInfo(rlongsword);");
Menu::AddChoice(WeaponsInfoRusties, "4Rusty PickAxe", "WeaponInfo(rpickaxe);");
Menu::AddChoice(WeaponsInfoRusties, "5Cracked Short Bow", "WeaponInfo(rshortbow);");
Menu::AddChoice(WeaponsInfoRusties, "6Cracked Light CrossBow", "WeaponInfo(rlightcrossbow);");
Menu::AddChoice(WeaponsInfoRusties, "7Rusty ShortSword", "WeaponInfo(rshortsword);");
Menu::AddChoice(WeaponsInfoRusties, "8Cracked Club", "WeaponInfo(rclub);");
Menu::AddChoice(WeaponsInfoRusties, "xWeapons Info Menu", "Menu::Display(WeaponsInfoMenu);");
Menu::New(SpellsInfoMenu, "Spells");
Menu::AddChoice(SpellsInfoMenu, "1Offensive Spells", "Menu::Display(OffensiveSpellsInfoMenu);");
Menu::AddChoice(SpellsInfoMenu, "2Deffensive Spells", "Menu::Display(DefensiveSpellsInfoMenu);");
Menu::AddChoice(SpellsInfoMenu, "3Neutral Spells", "Menu::Display(NeutralSpellsInfoMenu);");
Menu::AddChoice(SpellsInfoMenu, "4Divine Spells", "Menu::Display(DivineSpellsInfoMenu);");
Menu::AddChoice(SpellsInfoSlashing, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(OffensiveSpellsInfoMenu, "Offensive Spells Page 1 / 2");
Menu::AddChoice(OffensiveSpellsInfoMenu, "1Thorn", "WeaponInfo(thorn);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "2Fireball", "WeaponInfo(fireball);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "3FireBomb", "WeaponInfo(firebomb);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "4IceSpike", "WeaponInfo(icespike);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "5IceStorm", "WeaponInfo(icestorm);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "6IronFist", "WeaponInfo(ironfist);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "7Cloud", "WeaponInfo(cloud);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "8Melt", "WeaponInfo(melt);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "9PowerCloud", "WeaponInfo(powercloud);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "nNext Page", "Menu::Display(OffensiveSpellsInfoMenu2);");
Menu::AddChoice(OffensiveSpellsInfoMenu, "xSpells Info Menu", "Menu::Display(SpellsInfoMenu);");
Menu::New(OffensiveSpellsInfoMenu, "Offensive Spells Page 2 / 2");
Menu::AddChoice(OffensiveSpellsInfoMenu2, "1HellStorm", "WeaponInfo(hellstorm);");
Menu::AddChoice(OffensiveSpellsInfoMenu2, "2Beam", "WeaponInfo(beam);");
Menu::AddChoice(OffensiveSpellsInfoMenu2, "3DimensionRift", "WeaponInfo(dimensionrift);");
Menu::AddChoice(OffensiveSpellsInfoMenu2, "xPrevious Page", "Menu::Display(OffensiveSpellsInfoMenu);");
Menu::New(DefensiveSpellsInfoMenu, "Defensive Spells Page 1 / 2");
Menu::AddChoice(DefensiveSpellsInfoMenu, "1Heal", "WeaponInfo(thorn);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "2Shield", "WeaponInfo(shield);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "3AdvHeal1", "WeaponInfo(advheal1);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "4AdvShield1", "WeaponInfo(advshield1);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "5AdvHeal2", "WeaponInfo(advheal2);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "6AdvShield2", "WeaponInfo(advshield2);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "7AdvHeal3", "WeaponInfo(advheal3);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "8AdvShield3", "WeaponInfo(advshield3);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "9AdvHeal4", "WeaponInfo(advheal4);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "nNext Page", "Menu::Display(DefensiveSpellsInfoMenu2);");
Menu::AddChoice(DefensiveSpellsInfoMenu, "xSpells Info Menu", "Menu::Display(SpellsInfoMenu);");
Menu::New(DefensiveSpellsInfoMenu2, "Defensive Spells Page 2 / 2");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "1AdvShield4", "WeaponInfo(advshield4);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "2AdvHeal5", "WeaponInfo(advheal5);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "3AdvShield5", "WeaponInfo(advshield5);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "4AdvHeal6", "WeaponInfo(advheal6);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "5GodlyHeal", "WeaponInfo(godlyheal);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "6MassShield", "WeaponInfo(massshield);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "7MassHeal", "WeaponInfo(massheal);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "8FullHeal", "WeaponInfo(fullheal);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "9MassFullHeal", "WeaponInfo(massfullheal);");
Menu::AddChoice(DefensiveSpellsInfoMenu2, "xBack", "Menu::Display(DefensiveSpellsInfoMenu);");
Menu::New(NeutralSpellsInfoMenu, "Neutral Spells");
Menu::AddChoice(NeutralSpellsInfoMenu, "1Teleport", "WeaponInfo(teleport);");
Menu::AddChoice(NeutralSpellsInfoMenu, "2Transport", "WeaponInfo(transport);");
Menu::AddChoice(NeutralSpellsInfoMenu, "3AdvTransport", "WeaponInfo(advtransport);");
Menu::AddChoice(NeutralSpellsInfoMenu, "4MassTransport", "WeaponInfo(masstransport);");
Menu::AddChoice(NeutralSpellsInfoMenu, "5Mimic", "WeaponInfo(mimc);");
Menu::AddChoice(NeutralSpellsInfoMenu, "6Remort", "WeaponInfo(remort);");
Menu::AddChoice(NeutralSpellsInfoMenu, "xSpells Info Menu", "Menu::Display(SpellsInfoMenu);");
Menu::New(DivineSpellsInfoMenu, "Divine Spells");
Menu::AddChoice(DivineSpellsInfoMenu, "1Divine Fury", "WeaponInfo(divinefury);");
Menu::AddChoice(DivineSpellsInfoMenu, "2Kamikazi", "WeaponInfo(kamikazi);");
Menu::AddChoice(DivineSpellsInfoMenu, "xSpells Info Page", "Menu::Display(SpellsInfoMenu);");
Menu::New(SmithCombos, "Smith Combos Menu Page 1 / 3");
Menu::AddChoice(SmithCombos, "1"@ $SmithComboResult[1], "SmithComboCPA(1);");
Menu::AddChoice(SmithCombos, "2"@ $SmithComboResult[2], "SmithComboCPA(2);");
Menu::AddChoice(SmithCombos, "3"@ $SmithComboResult[3], "SmithComboCPA(3);");
Menu::AddChoice(SmithCombos, "4"@ $SmithComboResult[4], "SmithComboCPA(4);");
Menu::AddChoice(SmithCombos, "5"@ $SmithComboResult[5], "SmithComboCPA(5);");
Menu::AddChoice(SmithCombos, "6"@ $SmithComboResult[6], "SmithComboCPA(6);");
Menu::AddChoice(SmithCombos, "7"@ $SmithComboResult[7], "SmithComboCPA(7);");
Menu::AddChoice(SmithCombos, "8"@ $SmithComboResult[8], "SmithComboCPA(
;");
Menu::AddChoice(SmithCombos, "9"@ $SmithComboResult[9], "SmithComboCPA(9);");
Menu::AddChoice(SmithCombos, "nNext Page", "Menu::Display(SmithCombos2);");
Menu::AddChoice(SmithCombos, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(SmithCombos2, "Smith Combos Menu Page 2 / 3");
Menu::AddChoice(SmithCombos2, "1"@ $SmithComboResult[10], "SmithComboCPA(10);");
Menu::AddChoice(SmithCombos2, "2"@ $SmithComboResult[11], "SmithComboCPA(11);");
Menu::AddChoice(SmithCombos2, "3"@ $SmithComboResult[12], "SmithComboCPA(12);");
Menu::AddChoice(SmithCombos2, "4"@ $SmithComboResult[13], "SmithComboCPA(13);");
Menu::AddChoice(SmithCombos2, "5"@ $SmithComboResult[14], "SmithComboCPA(14);");
Menu::AddChoice(SmithCombos2, "6"@ $SmithComboResult[15], "SmithComboCPA(15);");
Menu::AddChoice(SmithCombos2, "7"@ $SmithComboResult[16], "SmithComboCPA(16);");
Menu::AddChoice(SmithCombos2, "8"@ $SmithComboResult[17], "SmithComboCPA(17);");
Menu::AddChoice(SmithCombos2, "9"@ $SmithComboResult[18], "SmithComboCPA(18);");
Menu::AddChoice(SmithCombos2, "nNext Page", "Menu::Display(SmithCombos3);");
Menu::AddChoice(SmithCombos2, "xPrevious Page", "Menu::Display(SmithCombos);");
Menu::New(SmithCombos3, "Smith Combos Menu Page 3 / 3");
Menu::AddChoice(SmithCombos3, "1"@ $SmithComboResult[19], "SmithComboCPA(19);");
Menu::AddChoice(SmithCombos3, "2"@ $SmithComboResult[20], "SmithComboCPA(20);");
Menu::AddChoice(SmithCombos3, "3"@ $SmithComboResult[21], "SmithComboCPA(21);");
Menu::AddChoice(SmithCombos3, "4"@ $SmithComboResult[22], "SmithComboCPA(22);");
Menu::AddChoice(SmithCombos3, "5"@ $SmithComboResult[23], "SmithComboCPA(23);");
Menu::AddChoice(SmithCombos3, "xPrevious Page", "Menu::Display(SmithCombos2);");
Menu::New(ArmorsInfoMenu, "Armors Menu Page 1 / 2");
Menu::AddChoice(ArmorsInfoMenu, "1Padded Armor", "WeaponInfo(paddedarmor);");
Menu::AddChoice(ArmorsInfoMenu, "2Leather Armor", "WeaponInfo(leatherarmor);");
Menu::AddChoice(ArmorsInfoMenu, "3Studded Leather Armor", "WeaponInfo(studdedleather);");
Menu::AddChoice(ArmorsInfoMenu, "4Spiked Leather Armor", "WeaponInfo(spikedleather);");
Menu::AddChoice(ArmorsInfoMenu, "5Hide Armor", "WeaponInfo(hidearmor);");
Menu::AddChoice(ArmorsInfoMenu, "6Scale Mail", "WeaponInfo(scalemail);");
Menu::AddChoice(ArmorsInfoMenu, "7Brigandine Armor", "WeaponInfo(brigandinearmor);");
Menu::AddChoice(ArmorsInfoMenu, "8Chain Mail", "WeaponInfo(chainmail);");
Menu::AddChoice(ArmorsInfoMenu, "9Ring Mail", "WeaponInfo(ringmail);");
Menu::AddChoice(ArmorsInfoMenu, "nNext Page", "Menu::Display(ArmorsInfoMenu2);");
Menu::AddChoice(ArmorsInfoMenu, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(ArmorsInfoMenu2, "New Accessories Page 2 / 2");
Menu::AddChoice(ArmorsInfoMenu2, "1Banded Mail", "WeaponInfo(bandedmail);");
Menu::AddChoice(ArmorsInfoMenu2, "2Splint Mail", "WeaponInfo(splintmail);");
Menu::AddChoice(ArmorsInfoMenu2, "3Bronze Plate Mail", "WeaponInfo(bronzeplatemail);");
Menu::AddChoice(ArmorsInfoMenu2, "4Blacksilver Plate", "WeaponInfo(blacksilverplate);");
Menu::AddChoice(ArmorsInfoMenu2, "5Plate Mail", "WeaponInfo(platemail);");
Menu::AddChoice(ArmorsInfoMenu2, "6Dragon Mail", "WeaponInfo(dragonmail);");
Menu::AddChoice(ArmorsInfoMenu2, "7Full Plate Mail", "WeaponInfo(fullplatemail);");
Menu::AddChoice(ArmorsInfoMenu2, "8Keldrin Armor", "WeaponInfo(keldrinarmor;)");
Menu::AddChoice(ArmorsInfoMenu2, "9Tri-Plate Armor", "WeaponInfo(triplatearmor);");
Menu::AddChoice(ArmorsInfoMenu2, "xPrevious Page", "Menu::Display(ArmorsInfoMenu);");
Menu::New(RobesInfoMenu, "Robes Menu Page 1 / 1");
Menu::AddChoice(RobesInfoMenu, "1Light Robe", "WeaponInfo(lightrobe);");
Menu::AddChoice(RobesInfoMenu, "2Apprentice Robe", "WeaponInfo(apprenticerobe);");
Menu::AddChoice(RobesInfoMenu, "3Fine Robe", "WeaponInfo(finerobe);");
Menu::AddChoice(RobesInfoMenu, "4Blood Robe", "WeaponInfo(bloodrobe);");
Menu::AddChoice(RobesInfoMenu, "5Advisor Robe", "WeaponInfo(advisorrobe);");
Menu::AddChoice(RobesInfoMenu, "6Elven Robe", "WeaponInfo(elvenrobe);");
Menu::AddChoice(RobesInfoMenu, "7Robe Of Venjance", "WeaponInfo(robeofvenjance);");
Menu::AddChoice(RobesInfoMenu, "8Phens Robe", "WeaponInfo(phensrobe);");
Menu::AddChoice(RobesInfoMenu, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(SAInfoMenu, "New Accessories Page 1 / 2");
Menu::AddChoice(SAInfoMenu, "1Steel Banded Boots", "WeaponInfo(steelbandboots);");
Menu::AddChoice(SAInfoMenu, "2Silvertone Boots", "WeaponInfo(silvertoneboots);");
Menu::AddChoice(SAInfoMenu, "3Titanium Braced Boots", "WeaponInfo(titaniumbracedboots);");
Menu::AddChoice(SAInfoMenu, "4Blacksilver Ring", "WeaponInfo(blacksilverring);");
Menu::AddChoice(SAInfoMenu, "5Battle Ring", "WeaponInfo(battlering);");
Menu::AddChoice(SAInfoMenu, "6Fingerless Gloves", "WeaponInfo(fingerlessgloves);");
Menu::AddChoice(SAInfoMenu, "7Silvertone Gauntlets", "WeaponInfo(silvertonegauntlets);");
Menu::AddChoice(SAInfoMenu, "8Leather Bracers", "WeaponInfo(leatherbracers);");
Menu::AddChoice(SAInfoMenu, "9Milled-Steel Bracers", "WeaponInfo(msteelbracers);");
Menu::AddChoice(SAInfoMenu, "nNext Page", "Menu::Display(SAInfoMenu2);");
Menu::AddChoice(SAInfoMenu, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(SAInfoMenu2, "New Accessories Page 2 / 2");
Menu::AddChoice(SAInfoMenu2, "1Silvertone Bracers", "WeaponInfo(silvertonebracers);");
Menu::AddChoice(SAInfoMenu2, "2Steel Helmet", "WeaponInfo(steelhelm);");
Menu::AddChoice(SAInfoMenu2, "3Silvertone Helmet", "WeaponInfo(silvertonehelm);");
Menu::AddChoice(SAInfoMenu2, "4Dragon Shield", "WeaponInfo(dragonshield);");
Menu::AddChoice(SAInfoMenu2, "5Heavenly Shield", "WeaponInfo(heavenlyshield);");
Menu::AddChoice(SAInfoMenu2, "xPrevious Page", "Menu::Display(SAInfoMenu);");
Menu::New(BowAmmoMenu, "New Accessories Page 1 / 2");
Menu::AddChoice(BowAmmoMenu, "1Small Rock", "WeaponInfo(smallrock);");
Menu::AddChoice(BowAmmoMenu, "2Basic Arrow", "WeaponInfo(basicarrow);");
Menu::AddChoice(BowAmmoMenu, "3Sheaf Arrow", "WeaponInfo(sheafarrow);");
Menu::AddChoice(BowAmmoMenu, "4Bladed Arrow", "WeaponInfo(bladedarrow);");
Menu::AddChoice(BowAmmoMenu, "5Diamond Arrow", "WeaponInfo(darrow);");
Menu::AddChoice(BowAmmoMenu, "6Short Quarrel", "WeaponInfo(shortquarrel);");
Menu::AddChoice(BowAmmoMenu, "7Light Quarrel", "WeaponInfo(lightquarrel);");
Menu::AddChoice(BowAmmoMenu, "8Heavy Quarrel", "WeaponInfo(heavyquarrel);");
Menu::AddChoice(BowAmmoMenu, "9Stone Feather", "WeaponInfo(stonefeather);");
Menu::AddChoice(BowAmmoMenu, "nNext Page", "Menu::Display(BowAmmoMenu2);");
Menu::AddChoice(BowAmmoMenu, "xMain Menu", "Menu::Display(PCRPGMain);");
Menu::New(BowAmmoMenu2, "New Accessories Page 2 / 2");
Menu::AddChoice(BowAmmoMenu2, "1Metal Feather", "WeaponInfo(metalfeather);");
Menu::AddChoice(BowAmmoMenu2, "2Talon", "WeaponInfo(talon);");
Menu::AddChoice(BowAmmoMenu2, "3Ceraphums Feather", "WeaponInfo(ceraphumsfeather);");
Menu::AddChoice(BowAmmoMenu2, "xPrevious Page", "Menu::Display(BowAmmoMenu);");
Event::Attach (eventClientMessage, PCRPG::onClientMessage, %client, %msg);
function PCRPG::onClientMessage (%client, %msg){
if(String::findSubStr(%msg, "has died")!=-1)
{GetRegEXP(%msg);}
if(String::findSubStr(%msg, "party experience!")!=-1)
{SayPartyEXP(%msg);}
}
function GetRegEXP(%msg){
$deadguy=getword(%msg, 0);
$regexp=getword(%msg, 6);
echo($deadguy);
echo($regexp);
schedule("say(0, \"#savecharacter\");" ,2);
}
function SayPartyEXP(%msg){
%partyexp = getword(%msg, 3);
%totalexp = $regexp+%partyexp;
%LvL = DeusRPG::FetchData("LVL");
%EXP = DeusRPG::FetchData("EXP");
%Bottom = %LvL * (200 + 50 * (%LvL - 1));
%TNL = Floor(%Bottom) - Floor(%EXP);
%newtnl = (%tnl - %totalexp);
say(1, $deadguy @" died and I gained " @ $regexp @" and " @ %partyexp @ " exp for a total of "@ %totalexp @"...(" @ %newtnl @ " tnl)");
}