[code]
[FUNCTION IMBUINGP]
IF !<SRC.dTAG.IMBUING.DIALOG>
SRC.TAG.IMBUING.DIALOG 1
ENDIF
IF !<ISEMPTY <ARGS>>
IF <ISNUM <ARGS>>
IF (<EVAL <ARGS>> >= 1) && (<EVAL <ARGS>> <= 112)
SRC.TAG.IMBUING.DIALOG <EVAL <ARGS>>
ENDIF
ENDIF
FOR I 1 112
IF STRMATCH(<ARGS>,<GETARGVX 1,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>)
SRC.TAG.IMBUING.DIALOG <dLOCAL.I>
ENDIF
ENDFOR
ENDIF

SRC.SDIALOG D_IMBUING_PROPERTIES
RETURN 1

[FUNCTION IMBUE]
SDIALOG D_IMBUING
RETURN 1

[DIALOG D_IMBUING_PROPERTIES]
250,150
RESIZEPIC 0 0 9350 300 300
DHTMLGUMP 0 10 280 20 0 0 <DEF.CENTER><GETARGVX 1,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>><DEF.CENTERE>
DHTMLGUMP 10 40 280 20 0 0 Intensity [min / max]: <GETARGVX 2,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>> / <GETARGVX 3,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>
DHTMLGUMP 10 70 280 20 0 0 Weight [min / max]: <GETARGVX 4,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>> / <GETARGVX 5,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>
LOCAL.Y 70
FOR I 1 3
LOCAL.Y += 30
DHTMLGUMP 10 <dLOCAL.Y> 280 20 0 0 Material [ <dLOCAL.I> ]: <GETARGVX 1,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>
GUMPPICTILED 250 <EVAL <dLOCAL.Y>-5> 28 28 9204
TILEPICHUE <EVAL 250+<GETARGVX 4,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>> <EVAL <dLOCAL.Y>+<GETARGVX 5,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>> <SERV.ITEMDEF.<GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>.ID> <QVAL <SERV.ITEMDEF.<GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>.TAG0.ITEMCOLOR>?<EVAL <SERV.ITEMDEF.<GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>.TAG.ITEMCOLOR>>:0>
TILEPICHUE <EVAL 255+<GETARGVX 4,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>> <EVAL 5+<dLOCAL.Y>+<GETARGVX 5,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>> <SERV.ITEMDEF.<GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>.ID> <QVAL <SERV.ITEMDEF.<GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>.TAG0.ITEMCOLOR>?<EVAL <SERV.ITEMDEF.<GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>.TAG.ITEMCOLOR>>:0>
TOOLTIP <GETARGVX 3,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>>
ENDFOR
TILEPICHUE 18 200 013BA <QVAL <GETARGVX 9,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 10 200 013B9 <QVAL <GETARGVX 9,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 60 196 013B2 <QVAL <GETARGVX 10,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 68 201 0F3E <QVAL <GETARGVX 10,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 120 192 01B74 <QVAL <GETARGVX 11,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 180 189 013DB <QVAL <GETARGVX 12,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 235 200 0108A <QVAL <GETARGVX 13,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>
TILEPICHUE 250 205 01086 <QVAL <GETARGVX 13,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>==1?0:904>

IF <dTAG0.IMBUING.DIALOG> > 1
BUTTON 5 5 210 211 1 0 1
ENDIF
IF <dTAG0.IMBUING.DIALOG> < 112
BUTTON 275 5 210 211 1 0 2
ENDIF

[DIALOG D_IMBUING_PROPERTIES BUTTON]
ON=0
RETURN 1
ON=1
TAG.IMBUING.DIALOG -= 1
IF <ISEMPTY <GETARGVX 1,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>
TAG.IMBUING.DIALOG += 1
ENDIF
SDIALOG D_IMBUING_PROPERTIES
RETURN 1
ON=2
TAG.IMBUING.DIALOG += 1
IF <ISEMPTY <GETARGVX 1,<DEF.IMBUING.PROPERTY.<dTAG.IMBUING.DIALOG>>>>
TAG.IMBUING.DIALOG -= 1
ENDIF
SDIALOG D_IMBUING_PROPERTIES
RETURN 1

[DEFNAME IMBUING_PROPERTIES]
// NAME,INT[MIN],INT[MAX],WEIGHT[MIN],WEIGHT[MAX],MAT[1],MAT[2],MAT[3],MELEEWEAPON,RANGEDWEAPON,SHIELD,ARMOR,JEWELRY,DESCRIPTIONCLILOC,[SLAYER/SKILL/PROPERTYTAG],[SLAYERNAME/SKILLNAME]
IMBUING.PROPERTY.1 Air Elemental Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111968,SLAYER,AIRELEM
IMBUING.PROPERTY.2 Anatomy,1,15,9,140,12,44,8,0,0,0,0,1,1112028,SKILL,ANATOMY
IMBUING.PROPERTY.3 Animal Lore,1,15,9,140,12,44,8,0,0,0,0,1,1112022,SKILL,ANIMALLORE
IMBUING.PROPERTY.4 Animal Taming,1,15,9,140,12,44,8,0,0,0,0,1,1112017,SKILL,TAMING
IMBUING.PROPERTY.5 Arachnid Slayer,1,1,130,130,34,45,38,1,1,0,0,0,1111983,SSLAYER,ARACHNID
IMBUING.PROPERTY.6 Archery,1,15,9,140,12,44,8,0,0,0,0,1,1112034,SKILL,ARCHERY
IMBUING.PROPERTY.7 Balanced,1,1,150,150,34,46,14,0,1,0,0,0,1112047,BALANCED
IMBUING.PROPERTY.8 Blood Elemental Slayer,1,1,110,110,12,43,42,1,1,0,0,0,1111969,SLAYER,BLOODELEM
IMBUING.PROPERTY.9 Bushido,1,15,9,140,12,44,8,0,0,0,0,1,1112029,SKILL,BUSHIDO
IMBUING.PROPERTY.10 Chivalry,1,15,9,140,12,44,8,0,0,0,0,1,1112035,SKILL,CHIVALRY
IMBUING.PROPERTY.11 Cold Resist,1,15,6,100,29,47,4,1,0,0,1,1,1112007,RESCOLD
IMBUING.PROPERTY.12 Cold Resist,1,18,5,100,12,47,52,0,1,0,0,0,1112007,RESCOLD
IMBUING.PROPERTY.13 Damage Increase,1,50,2,100,12,48,7,1,1,0,0,0,1112046,DAMAGEINCREASE
IMBUING.PROPERTY.14 Damage Increase,1,25,4,100,12,48,7,0,0,0,0,1,1112046,DAMAGEINCREASE
IMBUING.PROPERTY.15 Defense Chance Increase,1,25,4,110,34,49,57,0,1,0,0,0,1112049,DEFENSECHANCEINCREASE
IMBUING.PROPERTY.16 Defense Chance Increase,1,15,7,110,34,49,23,1,0,1,0,1,1112049,DEFENSECHANCEINCREASE
IMBUING.PROPERTY.17 Demon Slayer,1,1,130,130,34,45,9,1,1,0,0,0,1111984,SSLAYER,DEMON
IMBUING.PROPERTY.18 Dexterity Bonus,1,8,13,110,12,45,56,0,0,0,0,1,1111948,DEXTERITYBONUS
IMBUING.PROPERTY.19 Discordance,1,15,9,140,12,44,8,0,0,0,0,1,1112023,SKILL,DISCORDANCE
IMBUING.PROPERTY.20 Dragon Slayer,1,1,110,110,12,43,42,1,1,0,0,0,1111970,SLAYER,DRAGON
IMBUING.PROPERTY.21 Durability,10,100,10,100,12,50,31,0,0,1,0,0,1111949,DURABILITYBONUS
IMBUING.PROPERTY.22 Earth Elemental Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111971,SLAYER,EARTHELEM
IMBUING.PROPERTY.23 Elemental Slayer,1,1,130,130,34,45,40,1,1,0,0,0,1111985,SSLAYER,ELEMENTAL
IMBUING.PROPERTY.24 Energy Resist,1,15,6,100,12,51,42,0,1,0,0,0,1112008,RESENERGY
IMBUING.PROPERTY.25 Energy Resist,1,15,6,100,29,51,4,1,0,0,1,1,1112008,RESENERGY
IMBUING.PROPERTY.26 Enhance Potions,5,25,20,100,12,48,6,0,0,0,0,1,1111950,ENHANCEPOTIONS
IMBUING.PROPERTY.27 Evaluate Intelligence,1,15,9,140,12,44,8,0,0,0,0,1,1112030,SKILL,EVALUATINGINTEL
IMBUING.PROPERTY.28 Faster Cast Recovery,1,3,40,120,34,51,16,0,0,0,0,1,1111952,FASTERCASTRECOVERY
IMBUING.PROPERTY.29 Faster Casting,1,1,140,140,34,45,13,1,1,1,0,1,1111951,FASTERCASTING
IMBUING.PROPERTY.30 Fencing,1,15,9,140,12,44,8,0,0,0,0,1,1112012,SKILL,FENCING
IMBUING.PROPERTY.31 Fire Elemental Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111972,SLAYER,FIREELEM
IMBUING.PROPERTY.32 Fire Resist,1,18,5,100,12,45,25,0,1,0,0,0,1112009,RESFIRE
IMBUING.PROPERTY.33 Fire Resist,1,15,6,100,29,45,4,1,0,0,1,1,1112009,RESFIRE
IMBUING.PROPERTY.34 Focus,1,15,9,140,12,44,8,0,0,0,0,1,1112024,SKILL,FOCUS
IMBUING.PROPERTY.35 Gargoyle Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111973,SLAYER,GARGOYLE
IMBUING.PROPERTY.36 Healing,1,15,9,140,12,44,8,0,0,0,0,1,1112036,SKILL,HEALING
IMBUING.PROPERTY.37 Hit Chance Increase,1,25,5,130,34,46,28,0,1,0,0,0,1111958,HITCHANCEINCREASE
IMBUING.PROPERTY.38 Hit Chance Increase,1,15,8,130,34,46,22,1,0,0,0,1,1111958,HITCHANCEINCREASE
IMBUING.PROPERTY.39 Hit Cold Area,2,50,4,100,29,47,32,1,1,0,0,0,1111953,HITCOLDAREA
IMBUING.PROPERTY.40 Hit Dispel,2,50,4,100,29,46,37,1,1,0,0,0,1111959,HITDISPEL
IMBUING.PROPERTY.41 Hit Energy Area,2,50,4,100,29,51,32,1,1,0,0,0,1111954,HITENERGYAREA
IMBUING.PROPERTY.42 Hit Fire Area,2,50,4,100,29,45,32,1,1,0,0,0,1111955,HITFIREAREA
IMBUING.PROPERTY.43 Hit Fireball,2,50,4,140,12,45,25,1,1,0,0,0,1111960,HITFIREBALL
IMBUING.PROPERTY.44 Hit Harm,2,50,4,110,12,43,30,1,1,0,0,0,1111961,HITHARM
//IMBUING.PROPERTY.45 Hit Life Leech,1,100,1,110,29,45,41,1,1,0,0,0,1111964,HITLIFELEECH
IMBUING.PROPERTY.45 Hit Life Leech,2,50,1,110,29,45,41,1,1,0,0,0,1111964,HITLIFELEECH
IMBUING.PROPERTY.46 Hit Lightning,2,50,4,140,34,51,20,1,1,0,0,0,1111962,HITLIGHTNING
IMBUING.PROPERTY.47 Hit Lower Attack,2,50,4,110,12,43,30,1,1,0,0,0,1111965,HITLOWERATTACK
IMBUING.PROPERTY.48 Hit Lower Defense,2,50,4,130,12,49,30,1,1,0,0,0,1111966,HITLOWERDEFENSE
IMBUING.PROPERTY.49 Hit Magic Arrow,2,50,4,120,34,46,18,1,1,0,0,0,1111963,HITMAGICARROW
//IMBUING.PROPERTY.50 Hit Mana Leech,1,100,1,110,29,47,41,1,1,0,0,0,1111967,HITMANALEECH
IMBUING.PROPERTY.50 Hit Mana Leech,2,50,1,110,29,47,41,1,1,0,0,0,1111967,HITMANALEECH
IMBUING.PROPERTY.51 Hit Physical Area,2,50,4,100,29,50,32,1,1,0,0,0,1111956,HITPHYSICALAREA
IMBUING.PROPERTY.52 Hit Point Increase,1,5,22,110,12,45,28,0,0,0,1,0,1111993,HITPOINTINCREASE
IMBUING.PROPERTY.53 Hit Point Regeneration,1,2,50,100,12,49,35,0,0,0,1,0,1111994,HITPOINTREGENERATION
IMBUING.PROPERTY.54 Hit Poison Area,2,50,4,100,29,43,32,1,1,0,0,0,1111957,HITPOISONAREA
IMBUING.PROPERTY.55 Hit Stamina Leech,2,50,4,100,29,50,41,1,1,0,0,0,1111992,HITSTAMINALEECH
IMBUING.PROPERTY.56 Intelligence Bonus,1,8,13,110,12,49,53,0,0,0,0,1,1111995,INTELLIGENCEBONUS
IMBUING.PROPERTY.57 Lizardman Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111974,SLAYER,LIZARDMAN
IMBUING.PROPERTY.58 Lower Mana Cost,1,8,13,110,34,49,19,0,0,0,1,1,1111996,LOWERMANACOST
IMBUING.PROPERTY.59 Lower Reagent Cost,1,20,5,100,29,46,24,0,0,0,1,1,1111997,LOWERREAGENTCOST
IMBUING.PROPERTY.60 Lower Requirement,10,100,10,100,12,51,11,0,0,1,0,0,1111998,LOWERREQUIREMENTS
IMBUING.PROPERTY.61 Luck,1,120,0,100,12,48,55,0,1,0,0,0,1111999,LUCK
IMBUING.PROPERTY.62 Luck,1,100,1,100,29,48,5,1,0,0,1,1,1111999,LUCK
IMBUING.PROPERTY.63 Mace Fighting,1,15,9,140,12,44,8,0,0,0,0,1,1112013,SKILL,MACEFIGHTING
IMBUING.PROPERTY.64 Mage Armor,1,1,140,140,12,50,1,0,0,0,1,0,1112000,MAGEARMOR
IMBUING.PROPERTY.65 Mage Weapon,-29,-20,10,100,12,43,2,1,1,0,0,0,1112001,MAGEWEAPON
IMBUING.PROPERTY.66 Magery,1,15,9,140,12,44,8,0,0,0,0,1,1112014,SKILL,MAGERY
IMBUING.PROPERTY.67 Mana Increase,1,8,13,110,12,47,28,0,0,0,1,0,1112002,MANAINCREASE
IMBUING.PROPERTY.68 Mana Regeneration,1,2,50,100,12,47,35,0,0,0,1,0,1112003,MANAREGENERATION
IMBUING.PROPERTY.69 Meditation,1,15,9,140,12,44,8,0,0,0,0,1,,1112025,SKILL,MEDITATION
IMBUING.PROPERTY.70 Musicianship,1,15,9,140,12,44,8,0,0,0,0,1,1112015,SKILL,MUSICIANSHIP
IMBUING.PROPERTY.71 Mysticism,1,15,9,140,12,44,8,0,0,0,0,1,1115213,SKILL,MYSTICISM
IMBUING.PROPERTY.72 Necromancy,1,15,9,140,12,44,8,0,0,0,0,1,1112031,SKILL,NECROMANCY
IMBUING.PROPERTY.73 Night Sight,1,1,100,100,29,49,3,0,0,0,1,1,1112004,NIGHTSIGHT
IMBUING.PROPERTY.74 Ninjitsu,1,15,9,140,12,44,8,0,0,0,0,1,1112037,SKILL,NINJITSU
IMBUING.PROPERTY.75 Ogre Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111975,SLAYER,OGRE
IMBUING.PROPERTY.76 Ophidian Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111976,SLAYER,OPHIDIAN
IMBUING.PROPERTY.77 Orc Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111977,SLAYER,ORC
IMBUING.PROPERTY.78 Parrying,1,15,9,140,12,44,8,0,0,0,0,1,1112026,SKILL,PARRYING
IMBUING.PROPERTY.79 Peacemaking,1,15,9,140,12,44,8,0,0,0,0,1,,1112038,SKILL,PEACEMAKING
IMBUING.PROPERTY.80 Physical Resist,1,15,6,100,29,50,4,1,1,0,1,1,1112010,RESPHYSICAL
IMBUING.PROPERTY.81 Poison Elemental Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111978,SLAYER,POISONELEM
IMBUING.PROPERTY.82 Poison Resist,1,15,6,100,12,43,54,0,1,0,0,0,1112011,RESPOISON
IMBUING.PROPERTY.83 Poison Resist,1,15,6,100,29,43,4,1,0,0,1,1,1112011,RESPOISON
IMBUING.PROPERTY.84 Provocation,1,15,9,140,12,44,8,0,0,0,0,1,1112018,SKILL,PROVOCATION
IMBUING.PROPERTY.85 Reflect Physical Damage,1,15,6,100,29,48,33,0,0,1,1,0,1112006,REFLECTPHYSICALDAMAGE
IMBUING.PROPERTY.86 Repond Slayer,1,1,130,130,34,45,26,1,1,0,0,0,1111986,SSLAYER,REPOND
IMBUING.PROPERTY.87 Reptile Slayer,1,1,130,130,34,45,27,1,1,0,0,0,1111987,SSLAYER,REPTILE
IMBUING.PROPERTY.88 Resisting Spells,1,15,9,140,12,44,8,0,0,0,0,1,1112039,SKILL,MAGICRESISTANCE
IMBUING.PROPERTY.89 Scorpion Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111979,SLAYER,SCORPION
IMBUING.PROPERTY.90 Snake Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111980,SLAYER,SNAKE
IMBUING.PROPERTY.91 Snow Elemental Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111981,SLAYER,SNOWELEM
IMBUING.PROPERTY.92 Spell Channeling,1,1,100,100,29,50,36,1,1,1,0,0,1112040,SPELLCHANNELING
IMBUING.PROPERTY.93 Spell Damage Increase,1,12,8,100,12,43,7,0,0,0,0,1,1112041,SPELLDAMAGEINCREASE
IMBUING.PROPERTY.94 Spider Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111982,SLAYER,SPIDER
IMBUING.PROPERTY.95 Spirit Speak,1,15,9,140,12,44,8,0,0,0,0,1,1112019,SKILL,SPIRITSPEAK
IMBUING.PROPERTY.96 Stamina Increase,1,8,13,110,12,50,28,0,0,0,1,0,1112042,STAMINAINCREASE
IMBUING.PROPERTY.97 Stamina Regeneration,1,3,33,100,12,50,35,0,0,0,1,0,1112043,STAMINAREGENERATION
IMBUING.PROPERTY.98 Stealing,1,15,9,140,12,44,8,0,0,0,0,1,1112032,SKILL,STEALING
IMBUING.PROPERTY.99 Stealth,1,15,9,140,12,44,8,0,0,0,0,1,1112027,SKILL,STEALTH
IMBUING.PROPERTY.100 Strength Bonus,1,8,13,110,12,50,25,0,0,0,0,1,1112044,STRENGTHBONUS
IMBUING.PROPERTY.101 Swing Speed Increase,5,30,15,110,34,49,15,1,1,0,0,0,1112045,SWINGSPEEDINCREASE
IMBUING.PROPERTY.102 Swordsmanship,1,15,9,140,12,44,8,0,0,0,0,1,1112016,SKILL,SWORDSMANSHIP
IMBUING.PROPERTY.103 Tactics,1,15,9,140,12,44,8,0,0,0,0,1,1112020,SKILL,TACTICS
IMBUING.PROPERTY.104 Terathan Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111989,SLAYER,TERATHAN
IMBUING.PROPERTY.105 Throwing,1,15,9,140,12,44,8,0,0,0,0,1,1115212,SKILL,THROWING
IMBUING.PROPERTY.106 Troll Slayers,1,1,110,110,29,43,42,1,1,0,0,0,1111990,SLAYER,TROLL
IMBUING.PROPERTY.107 Undead Slayer,1,1,130,130,34,45,39,1,1,0,0,0,1111988,SSLAYER,UNDEAD
IMBUING.PROPERTY.108 Use Best Weapon Skill,1,1,150,150,12,46,10,1,0,0,0,0,1111946,USEBESTWEAPONSKILL
IMBUING.PROPERTY.109 Velocity,1,50,2,140,34,49,17,0,1,0,0,0,1112048,VELOCITY
IMBUING.PROPERTY.110 Veterinary,1,15,9,140,12,44,8,0,0,0,0,1,1112033,SKILL,VETERINARY
IMBUING.PROPERTY.111 Water Elemental Slayer,1,1,110,110,29,43,42,1,1,0,0,0,1111991,SLAYER,WATERELEM
IMBUING.PROPERTY.112 Wrestling,1,15,9,140,12,44,8,0,0,0,0,1,1112021,SKILL,WRESTLING
//IMBUING.PROPERTY. ,,,,,,,,,,,,,,,

[DEFNAME IMBUING_MATERIALS]
// NAME,BASEID,CLILOC,POSX,POSY
IMBUING.MATERIAL.1 Abyssal Cloth,I_ABYSSAL_CLOTH,1113350,-10,-8
IMBUING.MATERIAL.2 Arcanic Rune Stone,I_ARCANIC_RUNESTONE,1113352,-10,0
IMBUING.MATERIAL.3 Bottle of Ichor,I_BOTTLE_OF_ICHOR,1113361,-5,-3
IMBUING.MATERIAL.4 Boura Pelt,I_BOURA_PELT,1113355,-10,-5
IMBUING.MATERIAL.5 Chaga Mushroom,I_CHAGA_MUSHROOM,1113356,-15,-2
IMBUING.MATERIAL.6 Crushed Glass,I_CRUSHED_GLASS,1113351,-11,2
IMBUING.MATERIAL.7 Crystal Shards,I_CRYSTAL_SHARDS,1113347,-10,-5
IMBUING.MATERIAL.8 Crystalline Blackrock,I_CRYSTALLINE_BLACKROCK,1113344,-3,-1
IMBUING.MATERIAL.9 Daemon Claw,I_DAEMON_CLAW,1113330,-9,-3
IMBUING.MATERIAL.10 Delicate Scales,I_DELICATE_SCALES,1113349,-6,-9
IMBUING.MATERIAL.11 Elven Fletching,I_ELVEN_FLETCHING,1113346,-13,-5
IMBUING.MATERIAL.12 Enchanted Essence,I_ENCHANTED_ESSENCE,1031698,-9,0
IMBUING.MATERIAL.13 Essence of Achievement,I_ESSENCE_OF_ACHIEVEMENT,1113325,-3,-13
IMBUING.MATERIAL.14 Essence of Balance,I_ESSENCE_OF_BALANCE,1113324,-3,-13
IMBUING.MATERIAL.15 Essence of Control,I_ESSENCE_OF_CONTROL,1113340,-3,-13
IMBUING.MATERIAL.16 Essence of Diligence,I_ESSENCE_OF_DILIGENCE,1113338,-3,-13
IMBUING.MATERIAL.17 Essence of Direction,I_ESSENCE_OF_DIRECTION,1113328,-3,-13
IMBUING.MATERIAL.18 Essence of Feeling,I_ESSENCE_OF_FEELING,1113339,-3,-13
IMBUING.MATERIAL.19 Essence of Order,I_ESSENCE_OF_ORDER,1113342,-3,-13
IMBUING.MATERIAL.20 Essence of Passion,I_ESSENCE_OF_PASSION,1113326,-3,-13
IMBUING.MATERIAL.21 Essence of Persistence,I_ESSENCE_OF_PERSISTENCE,1113343,-3,-13
IMBUING.MATERIAL.22 Essence of Precision,I_ESSENCE_OF_PRECISION,1113327,-3,-13
IMBUING.MATERIAL.23 Essence of Singularity,I_ESSENCE_OF_SINGULARITY,1113341,-3,-13
IMBUING.MATERIAL.24 Faery Dust,I_FAIRY_DUST,1113358,-10,1
IMBUING.MATERIAL.25 Fire Ruby,I_GEM_FIRE_RUBY,1026254,-10,2
IMBUING.MATERIAL.26 Goblin Blood,I_GOBLIN_BLOOD,1113335,-3,-4
IMBUING.MATERIAL.27 Lava Serpent Crust,I_LAVA_SERPENT_CRUST,1113336,-10,-5
IMBUING.MATERIAL.28 Luminescent Fungi,I_FUNGI_LUMINESCENT,1032689,-13,2
IMBUING.MATERIAL.29 Magical Residue,I_MAGICAL_RESIDUE,1031697,-9,-1
IMBUING.MATERIAL.30 Parasitic Plant,I_PLANT_PARASITIC,1032688,-10,-10
IMBUING.MATERIAL.31 Powdered Iron,I_POWDERED_IRON,1113353,-12,-4
IMBUING.MATERIAL.32 Raptor Teeth,I_RAPTOR_TEETH,1113360,-14,-1
IMBUING.MATERIAL.33 Reflective Wolf Eye,I_REFLECTIVE_WOLF_EYE,1113362,-12,2
IMBUING.MATERIAL.34 Relic Fragment,I_RELIC_FRAGMENT,1031699,-10,-1
IMBUING.MATERIAL.35 Seed of Renewal,I_SEED_OF_RENEWAL,1113345,-3,0
IMBUING.MATERIAL.36 Silver Snake Skin,I_SILVER_SNAKE_SKIN,1113357,1,-13
IMBUING.MATERIAL.37 Slith Tongue,I_SLITH_TONGUE,1113359,-8,-6
IMBUING.MATERIAL.38 Spider Carapace,I_SPIDER_CARAPACE,1113329,-32,-3
IMBUING.MATERIAL.39 Undying Flesh,I_UNDYING_FLESH,1113337,-23,-12
IMBUING.MATERIAL.40 Vial of Vitriol,I_VIAL_OF_VITRIOL,1113331,-5,-3
IMBUING.MATERIAL.41 Void Orb,I_VOID_ORB,1113354,-10,-1
IMBUING.MATERIAL.42 White Pearl,I_GEM_WHITE_PEARL,1026253,-10,2
IMBUING.MATERIAL.43 Emerald,I_GEM_EMERALD,1023856,-2,3
IMBUING.MATERIAL.44 Star Sapphire,I_GEM_STAR_SAPPHIRE,1023867,-18,3
IMBUING.MATERIAL.45 Ruby,I_GEM_RUBY,1023866,-2,3
IMBUING.MATERIAL.46 Amber,I_GEM_AMBER,1023877,-22,2
IMBUING.MATERIAL.47 Sapphire,I_GEM_SAPPHIRE,1023865,-13,4
IMBUING.MATERIAL.48 Citrine,I_GEM_CITRINE,1023875,-25,3
IMBUING.MATERIAL.49 Tourmaline,I_GEM_TOURMALINE,1023864,-9,3
IMBUING.MATERIAL.50 Diamond,I_GEM_DIAMOND,1023878,-15,3
IMBUING.MATERIAL.51 Amethyst,I_GEM_AMETHYST,1023862,-22,3
IMBUING.MATERIAL.52 Dark Sapphire,I_GEM_DARK_SAPPHIRE,1026249,-10,2
IMBUING.MATERIAL.53 Turquoise,I_GEM_TURQUOISE,1026250,-10,2
IMBUING.MATERIAL.54 Perfect Emerald,I_GEM_PERFECT_EMERALD,1026251,-11,3
IMBUING.MATERIAL.55 Ecru Citrine,I_GEM_ECRU_CITRINE,1026252,-10,2
IMBUING.MATERIAL.56 Blue Diamond,I_GEM_BLUE_DIAMOND,1026255,-10,2
IMBUING.MATERIAL.57 Brilliant Amber,I_GEM_BRILLIANT_AMBER,1026256,-10,2

[DEFNAME IMBUING_CATEGORIES]
// NAME,BASEID,CLILOC,POSX,POSY
//IMBUING.CATEGORY.N NAME,NUMBER OF PROPERTIES IN
//IMBUING.CATEGORY.N.X PROPERTY 1,PROPERTY 2, PROPERTY .., PROPERTY M
IMBUING.CATEGORY.1 Casting,7
IMBUING.CATEGORY.1.X 28,29,58,59,64,92,93
IMBUING.CATEGORY.2 Combat,8
IMBUING.CATEGORY.2.X 13,14,15,16,37,38,101,108
IMBUING.CATEGORY.3 Hit Area Effects,5
IMBUING.CATEGORY.3.X 38,41,42,51,54
IMBUING.CATEGORY.4 Hit Effects,10
IMBUING.CATEGORY.4.X 40,43,44,45,46,47,48,49,50,55
IMBUING.CATEGORY.5 Miscellaneous,5
IMBUING.CATEGORY.5.X 26,61,62,73,85
IMBUING.CATEGORY.6 Resists,9
IMBUING.CATEGORY.6.X 11,12,24,25,32,33,80,82,83
IMBUING.CATEGORY.7 Lesser Slayers,18
IMBUING.CATEGORY.7.X 1,8,20,22,31,35,57,75,76,77,81,89,90,91,94,104,106,111
IMBUING.CATEGORY.8 Super Slayers,6
IMBUING.CATEGORY.8.X 5,17,23,86,87,107
IMBUING.CATEGORY.9 Stats,9
IMBUING.CATEGORY.9.X 18,52,53,56,67,68,96,97,100
// APPLY SKILLS ?
//IMBUING.CATEGORY.10 Skills,29
//IMBUING.CATEGORY.10.X 2,3,4,6,9,10,19,27,30,34,36,63,69,70,71,72,74,78,79,84,88,95,98,99,102,103,105,1
10,112

// cliloc 1150735 <center>Ingredients of ~1_NAME~</center>
// cliloc 1095248 * Imbuing ingredients<BR>* A nearby soulforge
// 1080417 WARNING! Imbuing will remove Self Repair from this item.
// 1080418 (Imbued)
// 1080421 You cannot unravel the magic of a blessed item.
// 1080422 Target an item you wish to magically unravel.
// 1080423 IMBUE ITEM: Adds or modifies a magic item property on the targeted item.<BR>UNRAVEL ITEM: Extracts one or more magical ingredients from an item. The targeted item is DESTROYED in the process.<BR>REIMBUE LAST: Reimbues the last item with the last property/intensity<BR>REIMBUE ITEM: Auto targets the last imbued item
// 1080424 The item must be in your backpack to magically unravel it.
// 1080425 You cannot magically unravel this item.
// 1080426 This item possesses special material and cannot be magically unraveled.
// 1080427 You cannot magically unravel an item that is currently enchanted.
// 1080428 You attempt to magically unravel the item, but fail.
// 1080429 You magically unravel the item!
// 1080430 <CENTER>IMBUING SELECTION MENU</CENTER>
// 1080431 Unravel Item - Extracts magical ingredients from an item, destroying it
// 1080432 Imbue Item - Adds or modifies an item property on an item
// 1080433 You must be near a soulforge to magically unravel an item.
// 1080434 Your Imbuing skill is not high enough to magically unravel this item.
// 1080435 You cannot magically unravel this item. Your backpack is full.
// 1080436 You cannot magically unravel this item. The magic in this item has been weakened due to either low durability or the imbuing process.
// 1080437 You cannot magically unravel this item. It appears to possess little or no magic.
// 1080438 You cannot imbue a blessed item.
// 1080444 You cannot imbue an item that is under the effects of the ninjitsu focus attack ability.
// 1080445 You cannot magically unravel an item that is under the effects of the ninjitsu focus attack ability.
// 1080446 You cannot enchant an item that is under the effects of the ninjitsu focus attack ability.
// 1079588 <CENTER>IMBUING MENU</CENTER>
// 1079589 Target an item you wish to imbue.
// 1079590 This item already possesses special material and cannot be imbued.
// 1079717 <CENTER>IMBUING CONFIRMATION</CENTER>
// 1113622 Reimbue Last - Repeats the last imbuing attempt
// 1113767 Meager Imbuing Bag
// 1113768 Average Imbuing Bag
// 1113769 Valuable Imbuing Bag
// 1151415 Imbuing Success Bonus
// 1151959 Focused Imbuing
// 1151960 Concentrated Imbuing
// 1152333 You do not have enough Imbuing skill to re-forge items. Using standard Runic Crafting instead.
// 1010239 You may not imbue an item with faction properties while its equipped!
// 1011569 Imbue with Faction properties?
// 1071359 Imbued Mystic Crystal
// 1079575 The item must be in your backpack to imbue it.
// 1079576 You cannot imbue this item.
// 1079577 You cannot imbue this item.
// 1079768 Yes, imbue this item.
// 1079772 You cannot imbue this item with any more item properties.
// 1079773 You do not have enough resources to imbue this item.
// 1079774 You attempt to imbue the item, but fail.
// 1079775 You successfully imbue the item!
// 1079786 You must repair this item before you can imbue it with the durability item property.
// 1079787 You must be near a soulforge to imbue an item.
// 1080130 You cannot imbue an item that is currently enchanted.
// 1094745 Your Imbuing skill is not high enough to perform this imbue attempt.
// 1113364 You cannot imbue this property on this item at the selected intensity because it will make the item unstable.
// 1113377 Your chance to learn while imbuing this item is diminished, as it has been imbued many times before.
// 1113473 The item already has that property imbued at that intensity.
// 1113571 Imbue Last Item - Auto targets the last imbued item
// 1113572 You haven't imbued anything yet!
// 1113622 Reimbue Last - Repeats the last imbuing attempt
// 1113647 Times Imbued:
// 1113647 Weighted Intensity:
// 1114267 Imbue Item
// 1114268 Back
// 1114274 Imbue Last Property - Imbues a new item with the last property
// 1114291 You cannot imbue the last property on that item.
// 1114312 You cannot imbue faction items.
// 1116362 You cannot imbue this item with the durability property.
// 1111810 Unravel Magic Item Bag
// 1111812 You fail to magically unravel some items for lack of skill.
// 1111814 Unraveled: ~1_COUNT~/~2_NUM~ items
// 1111874 You conclude that item will magically unravel into: ~1_ingredient~
// 1111875 Your Imbuing skill is not high enough to identify the imbuing ingredient.
// 1111876 You conclude that item cannot be magically unraveled. It appears to possess little to no magic.
// 1111877 You conclude that item cannot be magically unraveled. The magic in that item has been weakened due to either low durability or the imbuing process.
// 1111878 You conclude that item cannot be magically unraveled.
// 1112402 <CENTER>UNRAVEL MAGIC ITEM CONFIRMATION</CENTER>
// 1112408 You cannot magically unravel a faction reward item.
// 1114275 Unravel Container - Unravels all items in a container
// 1114292 Unravel Item
// 3006279 Unravel Magic Items
// 3006280 Unravel ALL Magic Items (Including Artifacts)
//
//
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// LOOT TEMPLATES
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// ALL MONSTERS IN CAVERN OF DISCARDED
[TEMPLATE LT_CAVERN_OF_THE_DISCARDED]
ITEM {I_ABYSSAL_CLOTH 1 I_ARCANIC_RUNESTONE 1 I_CRUSHED_GLASS 1 I_CRYSTAL_SHARDS 1 I_CRYSTALLINE_BLACKROCK 1 I_DELICATE_SCALES 1 I_ELVEN_FLETCHING 1 I_LODESTONE 1 I_POWDERED_IRON 1 I_SEED_OF_RENEWAL 1 I_REFLECTIVE_WOLF_EYE 1},{0 3}

// WOLF SPIDER, SENTINEL SPIDER AND NAVREY NIGHT EYES
[TEMPLATE LT_BOTTLE_OF_ICHOR]
ITEM I_BOTTLE_OF_ICHOR,{0 3}

// HIGH PLAINS BOURA, LOWLAND BOURA, RUDDY BOURA
[TEMPLATE LT_BOURA_PELT]
ITEM I_BOURA_PELT,{0 3}

// It can be found in the back of the Tomb of Kings spawning on the cavern floor as well as on the ground near the entrance
// of Abyssal Infernal Champion Spawn.
[TEMPLATE LT_CHAGA_MUSHROOMS]
ITEM I_CHAGA_MUSHROOM,{0 3}

// ORE ELEMENTALS IN ANY FACET, CAN BE MINED IN TER MUR
[TEMPLATE LT_CRYSTALLINE_BLACKROCK]
ITEM I_CRYSTALLINE_BLACKROCK,{0 3}

// FIRE DAEMON LOOT TEMPLATE
[TEMPLATE LOOT_FIRE_DAEMON]
CONTAINER I_BACKPACK
ITEM I_DEMON_CLAW,{0 3}
//ITEM { I_TREASURE_MAP_4 1 0 4 }
ITEM I_ESSENCE_OF_PRECISION,{0 3}
ITEM I_ESSENCE_OF_PASSION,{0 3}
ITEM I_ESSENCE_OF_ORDER,{0 3}

// Abyssal Lair Entrance Mini-Champ
[TEMPLATE LT_ABYSSAL_LAIR_ENTRANCE_MINI_CHAMP]
ITEM I_ESSENCE_OF_ACHIEVEMENT,{0 3}

// Clan Chitter Mini-Champ
[TEMPLATE LT_CLAN_CHITTER_MINI_CHAMP]
ITEM {I_ESSENCE_BALANCE 1 I_ABYSSAL_CLOTH 1 I_ARCANIC_RUNESTONE 1 I_CRUSHED_GLASS 1 I_CRYSTAL_SHARDS 1 I_CRYSTALLINE_BLACKROCK 1 I_DELICATE_SCALES 1 I_ELVEN_FLETCHING 1 I_POWDERED_IRON 1 I_REFLECTIVE_WOLF_EYE 1 I_SEED_OF_RENEWAL 1},{0 3}

// Clan Ribbon Mini-Champ
[TEMPLATE LT_CLAN_RIBBON_MINI_CHAMP]
ITEM {I_ESSENCE_BALANCE 1 I_ABYSSAL_CLOTH 1 I_ARCANIC_RUNESTONE 1 I_CRUSHED_GLASS 1 I_CRYSTAL_SHARDS 1 I_CRYSTALLINE_BLACKROCK 1 I_DELICATE_SCALES 1 I_ELVEN_FLETCHING 1 I_POWDERED_IRON 1 I_REFLECTIVE_WOLF_EYE 1 I_SEED_OF_RENEWAL 1},{0 3}

// Clan Scratch Mini-Champ
[TEMPLATE LT_CLAN_SCRATCH_MINI_CHAMP]
ITEM {I_ESSENCE_BALANCE 1 I_ABYSSAL_CLOTH 1 I_ARCANIC_RUNESTONE 1 I_CRUSHED_GLASS 1 I_CRYSTAL_SHARDS 1 I_CRYSTALLINE_BLACKROCK 1 I_DELICATE_SCALES 1 I_ELVEN_FLETCHING 1 I_POWDERED_IRON 1 I_REFLECTIVE_WOLF_EYE 1 I_SEED_OF_RENEWAL 1},{0 3}

// Enslaved Goblins Mini-Champ
[TEMPLATE LT_ENSLAVED_GOBLINS_MINI_CHAMP]
ITEM {I_ESSENCE_OF_CONTROL 1 I_GOBLIN_BLOOD 1},{0 3}

// Stygian Dragon Lair Entrance Mini-Champ
[TEMPLATE LT_STYGIAN_DRAGON_LAIR_ENTRANCE_MINI_CHAMP]
ITEM {I_ESSENCE_OF_DILIGENCE 1 I_FAERY_DUST 1},{0 3}

// The Lands of the Lich Mini-Champ
[TEMPLATE LT_THE_LANDS_OF_THE_LICH_MINI_CHAMP]
ITEM I_ESSENCE_OF_DIRECTION,{0 3}

// The Secret Garden Mini-Champ
[TEMPLATE LT_THE_SECRET_GARDEN_MINI_CHAMP]
ITEM {I_ESSENCE_OF_FEELING 1 I_FAERY_DUST 1},{0 3}

// Fire Temple Ruins Mini-Champ
[TEMPLATE LT_FIRE_TEMPLE_RUINS_MINI_CHAMP]
ITEM {I_ESSENCE_OF_ORDER 1 I_LAVA_SERPENT_CRUST 1 I_DAEMON_CLAW 1},{0 3}

///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// IMBUING MENU
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
[DIALOG D_IMBUING]
0,0
RESIZEPIC 100 120 9200 550 300
GUMPPICTILED 110 130 530 25 2624 3
GUMPPICTILED 110 165 530 210 2624 6
GUMPPICTILED 110 385 530 25 2624 15
CHECKERTRANS 110 130 530 25
CHECKERTRANS 110 165 530 210
CHECKERTRANS 110 385 530 25

XMFHTMLGUMPCOLOR 110 135 550 25 1079588 0 0 32767// IMBUING MENU
XMFHTMLGUMPCOLOR 170 185 550 25 1080432 0 0 32767// Imbue Item - Adds or modifies an item property on an item
XMFHTMLGUMPCOLOR 170 215 550 25 1113622 0 0 32767// Reimbue Last - Repeats the last imbuing attempt
XMFHTMLGUMPCOLOR 170 245 550 25 1113571 0 0 32767// Imbue Last Item - Auto targets the last imbued item
XMFHTMLGUMPCOLOR 170 275 550 25 1114274 0 0 32767// Imbue Last Property - Imbues a new item with the last property
XMFHTMLGUMPCOLOR 170 305 550 25 1080431 0 0 32767// Unravel Item - Extracts magical ingredients from an item, destroying it
DTEXT 170 386 1152 CANCEL

// IMBUE ITEM
BUTTON 130 185 4005 4007 1 0 1
// REIMBUE LAST
//BUTTON 130 215 4005 4007 1 0 2
// IMBUE LAST ITEM
//BUTTON 130 245 4005 4007 1 0 3
// IMBUE LAST PROPERTY
//BUTTON 130 275 4005 4007 1 0 4
// UNRAVEL ITEM
BUTTON 130 305 4005 4007 1 0 5
// CANCEL
BUTTON 130 386 4017 4019 1 0 0

[DIALOG D_IMBUING BUTTON]
ON=1
SYSMESSAGELOC -1,1079589
TARGETF F_IMBUING_TARGET
RETURN 1
ON=2
F_IMBUING_TARGET_REIMBUELAST
ON=3
F_IMBUING_TARGET_IMBUELASTITEM
ON=4
F_IMBUING_TARGET_IMBUELASTPROPERTY
ON=5
SYSMESSAGELOC -1,1080422
TARGETF F_IMBUING_TARGET_UNRAVEL
RETURN 1

[DIALOG D_IMBUING_1]
0,0
PAGE 0
RESIZEPIC 50 25 9200 500 500
//GUMPPICTILED 0 0 1024 786 9274
GUMPPICTILED 0 786 1024 786 9274
GUMPPICTILED 1024 0 1024 786 9274
GUMPPICTILED 1024 786 1024 786 9274
GUMPPICTILED 60 35 480 25 2624
GUMPPICTILED 60 70 200 410 2624
GUMPPICTILED 270 70 270 410 2624
GUMPPICTILED 60 490 480 25 2624
//CHECKERTRANS 0 0 1024 786
CHECKERTRANS 0 786 1024 786
CHECKERTRANS 1024 0 1024 786
CHECKERTRANS 1024 786 1024 786
CHECKERTRANS 60 35 480 25
CHECKERTRANS 60 70 200 410
CHECKERTRANS 270 70 270 410
CHECKERTRANS 60 490 480 25

XMFHTMLGUMPCOLOR 60 40 480 20 1079588 0 0 32767// 15 <CENTER>IMBUING MENU</CENTER>
XMFHTMLGUMPCOLOR 60 90 200 70 1044010 0 0 32767// 18 <CENTER>CATEGORIES</CENTER>
XMFHTMLGUMPCOLOR 270 90 270 70 1044011 0 0 32767// 29 <CENTER>SELECTIONS</CENTER>

BUTTON 80 490 4017 4019 1 0 0
DTEXT 120 491 1152 CANCEL

//PAGE 1

LOCAL.POSY 100
IF STRMATCH(*BOW*,<TYPE>)
LOCAL.TYPE 2
ELIF STRMATCH(*WEAPON*,<TYPE>)
LOCAL.TYPE 1
ELIF STRMATCH(*SHIELD*,<TYPE>)
LOCAL.TYPE 3
ELIF STRMATCH(*ARMOR*,<TYPE>)
LOCAL.TYPE 4
ELIF STRMATCH(*JEWELRY*,<TYPE>)
LOCAL.TYPE 5
ENDIF
IF !<LOCAL.TYPE>
RETURN 1
ENDIF

FOR I 1 9
LOCAL.COUNT<dLOCAL.I> 0
LOCAL.CATEGORY <dLOCAL.I>
FOR X 1 <GETARGVX 2,<DEF.IMBUING.CATEGORY.<dLOCAL.I>>>
LOCAL.PROPERTY <GETARGVX <dLOCAL.X>,<DEF.IMBUING.CATEGORY.<dLOCAL.I>.X>>
LOCAL.POS <EVAL 8+<dLOCAL.TYPE>>
IF <GETARGVX <dLOCAL.POS>,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>> == 1
LOCAL.COUNT<dLOCAL.I> += 1
ENDIF
ENDFOR
IF <dLOCAL.COUNT<dLOCAL.I>> >= 1
LOCAL.POSY += 20
BUTTON 70 <dLOCAL.POSY> 4005 4007 1 0 <EVAL 10+<dLOCAL.I>>
DTEXT 110 <dLOCAL.POSY> 1152 <GETARGVX 1,<DEF.IMBUING.CATEGORY.<dLOCAL.I>>>
ENDIF
ENDFOR
FOR I 1 9
IF <dLOCAL.COUNT<dLOCAL.I>> >= 1
LOCAL.PAGE <EVAL 10+<dLOCAL.I>>
PAGE <dLOCAL.PAGE>
LOCAL.POSYY 100
FOR Z 1 <GETARGVX 2,<DEF.IMBUING.CATEGORY.<dLOCAL.I>>>
LOCAL.PROPERTYY <GETARGVX <dLOCAL.Z>,<DEF.IMBUING.CATEGORY.<dLOCAL.I>.X>>
LOCAL.POSS <EVAL 8+<dLOCAL.TYPE>>
IF <GETARGVX <dLOCAL.POSS>,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTYY>>> == 1
LOCAL.POSYY += 20
BUTTON 280 <dLOCAL.POSYY> 4005 4007 1 0 <EVAL 1000+<dLOCAL.PROPERTYY>>
DTEXT 320 <dLOCAL.POSYY> 1152 <GETARGVX 1,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTYY>>>
ENDIF
ENDFOR
ENDIF
ENDFOR

[DIALOG D_IMBUING_1 BUTTON]
ON=0
RETURN 1
ON=11 19
SDIALOG D_IMBUING_1 <ARGN1>
RETURN 1
ON=1001 1112
TAG.IMBUING.INTENSITY <GETARGVX 2,<DEF.IMBUING.PROPERTY.<EVAL <ARGN1>-1000>>>
SDIALOG D_IMBUING_2 <ARGN1>
RETURN 1

[DIALOG D_IMBUING_2]
0,0
LOCAL.PROPERTY <EVAL <ARGN1>-1000>
TAG.PROPERTY <dLOCAL.PROPERTY>
RESIZEPIC 50 25 9200 550 450 0 0
GUMPPICTILED 60 35 530 25 2624
GUMPPICTILED 60 70 260 140 2624
GUMPPICTILED 330 70 260 140 2624
GUMPPICTILED 60 220 260 138 2624
GUMPPICTILED 330 220 260 138 2624
GUMPPICTILED 60 366 530 65 2624
GUMPPICTILED 60 440 530 25 2624
CHECKERTRANS 60 35 530 25 0
CHECKERTRANS 60 70 260 140 0
CHECKERTRANS 330 70 260 140 0
CHECKERTRANS 60 220 260 138 0
CHECKERTRANS 330 220 260 138 0
CHECKERTRANS 60 366 530 65 0
CHECKERTRANS 60 440 530 25 0
XMFHTMLGUMPCOLOR 50 40 550 20 1079717 0 0 32767// 3 <CENTER>IMBUING CONFIRMATION</CENTER>
XMFHTMLGUMPCOLOR 115 80 260 20 1114269 0 0 32767// 6 PROPERTY INFORMATION
XMFHTMLGUMPCOLOR 340 80 240 140 <GETARGVX 14,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>> 0 0 32767// 9 Eliminates an item's Meditation and Stealth penalties.
XMFHTMLGUMPCOLOR 60 230 260 20 1044055 0 0 32767// 12 <CENTER>MATERIALS</CENTER>
XMFHTMLGUMPCOLOR 425 230 260 20 1113650 0 0 32767// 15 RESULTS

FOR I 1 112
IF STRMATCH(*SSLAYER*,<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>)
IF STRMATCH(*<GETARGVX 16,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>*,<TAG0.SLAYER.SUPER>)
LOCAL.PROPS += 1
ENDIF
ELIF STRMATCH(SLAYER,<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>)
IF STRMATCH(*<GETARGVX 16,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>*,<TAG0.SLAYER.LESS>)
LOCAL.PROPS += 1
ENDIF
ELIF STRMATCH(SKILL,<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>)
FOR X 1 3
IF <TAG0.SKILL.BONUS.<dLOCAL.X>>
IF STRMATCH(*<GETARGVX 16,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>*,<TAG0.SKILL.BONUS.<dLOCAL.X>>)
LOCAL.PROPS += 1
ENDIF
ENDIF
ENDFOR
ELSEIF <TAG0.<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dLOCAL.I>>>>
LOCAL.PROPS += 1
ENDIF
ENDFOR

DTEXT 110 441 1152 Back
DTEXT 540 441 1152 Confirm
DTEXT 340 255 1152 Properties: <dLOCAL.PROPS>/10
IF <TAG0.IMBUING.TOTALPROPERTYWEIGHT>
LOCAL.TOTALPROPERTYWEIGHT <dTAG0.IMBUING.TOTALPROPERTYWEIGHT>
ELSE
LOCAL.TOTALPROPERTYWEIGHT <F_GETTOTALPROPERTYWEIGHT>
ENDIF
LOCAL.WEIGHT <QVAL <TAG0.IMBUING.INTENSITY>?<EVAL (<TAG0.IMBUING.INTENSITY>*<GETARGVX 5,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>)/<GETARGVX 3,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>:<GETARGVX 4,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>
DTEXT 340 275 1152 Total Property Weight: <EVAL <dLOCAL.TOTALPROPERTYWEIGHT>+<dLOCAL.WEIGHT>>/1200
//DTEXT 340 275 1152 Total Property Weight: <QVAL <TAG0.IMBUING.TOTALPROPERTYWEIGHT>?<dTAG0.IMBUING.TOTALPROPERTYWEIGHT>:<F_GETTOTALPROPERTYWEIGHT>>/1200
DTEXT 340 295 1152 Times Imbued: <dTAG.TIMESIMBUED>/20
DTEXT 70 105 1152 Property: <GETARGVX 1,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>
LOCAL.CURRENTWEIGHT <QVAL <TAG0.IMBUING.INTENSITY>?<EVAL (<TAG0.IMBUING.INTENSITY>*<GETARGVX 5,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>)/<GETARGVX 3,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>:<GETARGVX 4,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>
DTEXT 70 125 1152 Weight: <dLOCAL.CURRENTWEIGHT>/<GETARGVX 5,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>
DTEXT 70 145 1152 Intensity: <QVAL <TAG0.IMBUING.INTENSITY>?<dTAG0.IMBUING.INTENSITY>/<GETARGVX 3,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>:<GETARGVX 2,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>/<GETARGVX 3,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>
DTEXT 370 330 1152 Success Chance: WTF

LOCAL.WEIGHTMAX <GETARGVX 5,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>

LOCAL.MATERIAL.1 <QVAL <dLOCAL.CURRENTWEIGHT> < <EVAL <dLOCAL.WEIGHTMAX>/5>?1:<EVAL ((<dLOCAL.CURRENTWEIGHT>*5)/<dLOCAL.WEIGHTMAX>)>>
DTEXT 70 250 1152 <GETARGVX 1,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+1>,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>>: <dLOCAL.MATERIAL.1>

LOCAL.MATERIAL.2 <QVAL <dLOCAL.CURRENTWEIGHT> < <EVAL <dLOCAL.WEIGHTMAX>/10>?1:<EVAL ((<dLOCAL.CURRENTWEIGHT>*10)/<dLOCAL.WEIGHTMAX>)>>
DTEXT 70 270 1152 <GETARGVX 1,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+2>,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>>: <dLOCAL.MATERIAL.2>


IF <dLOCAL.CURRENTWEIGHT> > <EVAL (<dLOCAL.WEIGHTMAX>*90)/100>
LOCAL.MATERIAL.3 <EVAL (((<dLOCAL.CURRENTWEIGHT>-((<dLOCAL.WEIGHTMAX>*9)/10))*10)/(<dLOCAL.WEIGHTMAX>/10))>
DTEXT 70 290 1152 <GETARGVX 1,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+3>,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>>: <dLOCAL.MATERIAL.3>
ENDIF
TAG.IMBUING.MATERIAL <dLOCAL.MATERIAL.1>,<dLOCAL.MATERIAL.2>,<dLOCAL.MATERIAL.3>

XMFHTMLGUMPCOLOR 300 370 260 20 1062300 0 0 32767// 34 New Value:
DTEXT 323 399 1152 <QVAL <TAG0.IMBUING.INTENSITY>?<dTAG0.IMBUING.INTENSITY>:<GETARGVX 2,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>>
BUTTON 70 441 4014 4016 1 0 0
BUTTON 510 441 4005 4007 1 0 2
BUTTON 280 400 5223 5223 <QVAL <dTAG0.IMBUING.INTENSITY>==<GETARGVX 2,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>?0:1> 0 101
BUTTON 295 400 5223 5223 <QVAL <dTAG0.IMBUING.INTENSITY>==<GETARGVX 2,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>?0:1> 0 102
BUTTON 345 400 5224 5224 <QVAL <dTAG0.IMBUING.INTENSITY>==<GETARGVX 3,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>?0:1> 0 103
BUTTON 360 400 5224 5224 <QVAL <dTAG0.IMBUING.INTENSITY>==<GETARGVX 3,<DEF.IMBUING.PROPERTY.<dLOCAL.PROPERTY>>>?0:1> 0 104

[DIALOG D_IMBUING_2 BUTTON]
ON=0
SDIALOG D_IMBUING_1
RETURN 1
ON=2
// NEED THE CALCULATIONS TO SUCCESS
IF STRMATCH(*SSLAYER*,<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dTAG.PROPERTY>>>)
IF STRMATCH(*<GETARGVX 16,<DEF.IMBUING.PROPERTY.<dTAG.PROPERTY>>>*,<TAG0.SLAYER.SUPER>)
LOCAL.RETURNMSG You cannot imbue this item because it already have this property.
LOCAL.RETURN 1
ENDIF
ELIF STRMATCH(SLAYER,<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dTAG.PROPERTY>>>)
IF STRMATCH(*<GETARGVX 16,<DEF.IMBUING.PROPERTY.<dTAG.PROPERTY>>>*,<TAG0.SLAYER.LESS>)
LOCAL.RETURNMSG You cannot imbue this item because it already have this property.
LOCAL.RETURN 1
ENDIF
ELSEIF <dTAG0.<GETARGVX 15,<DEF.IMBUING.PROPERTY.<dTAG.PROPERTY>>>> >= <dTAG0.IMBUING.INTENSITY>
LOCAL.RETURNMSG You cannot imbue this item because it already have equal or greater intensity of this property.
LOCAL.RETURN 1
ENDIF

IF <dLOCAL.RETURN>
SRC.SYSMESSAGE @,,1 <LOCAL.RETURNMSG>
TAG.IMBUING.INTENSITY
TAG.PROPERTY
RETURN 1
ENDIF


//SERV.B <GETARGVX 1,<DEF.IMBUING.PROPERTY.<dTAG0.PROPERTY>>> <dTAG.IMBUING.INTENSITY>
FOR I 1 <GETARGVX -1,<TAG0.IMBUING.MATERIAL>>
IF <GETARGVX <dLOCAL.I>,<TAG0.IMBUING.MATERIAL>> > 0
LOCAL.MATERIAL.<dLOCAL.I> <GETARGVX 2,<DEF.IMBUING.MATERIAL.<GETARGVX <EVAL 5+<dLOCAL.I>>,<DEF.IMBUING.PROPERTY.<dTAG.PROPERTY>>>

а кто Автор ?)

Скоро ссылки кину на автора данного творения

Вообще интересно поглядеть на оси сервер, выполненный на сфере. Таковых еще не встречал

Я работаю над этаким гибридом, если повезет когда нить ради собственного удовольствия запушу)))

Как ни странно, основное англоязычное комьюнити Сферы заинтересовано именно ОСИ стилем. Несколько лет назад они создали проект Community Script Pack и даже довольно-таки продвинулись в этом деле. Но потом сдохла БД форума, с ней стерлись все обсуждения, и на проект как-то забили. Сейчас они пытаются запустить проект Community Script Pack 2.0. Правда о реальных серверах на этих скриптах я не слышал. И, кстати, зря у них нет таких. Был бы реальный сервер, было бы куда больше мотивации работать.

Да у там была подобная тема были довольно интересные скрипты, сам стиль их описания хоть было на что посмотреть что хоть граматнно написано и открыто.

т.е. там отличался скриптинг? Или это так-же как и во всех версиях сферы, из-за закрытых исходников? Т.е. компилируется свежее измененное ядро, в связи с чем устаревшие функции/методы и пр. перестают функционировать?

открыты исходники или закрыты, для 99% это ничего не значит
скриптинг отличается, практически у каждого манера по разному организовывать работу сервера
практически ничего интересного в SCP нет, очень много багов, глюков и недоработок

НУ да а примеры работы надо брать с воздуха или заного придумывать велосипед

Ты указал автора?
Ты сам эти скрипты тестил?
Ты объяснил что это за хрень и как она работает?
Ты написал инструкцию по установки и использованию?
Ты указал версию сферы и клиента, для которых этот скрипт написан?

Вывод: "твои" примеры нахер никому не сдались. А если учесть то, что ты их под копирку слил с http://spherecommunity.net/ вообще не красиво получается!

Мне кажется в "Архив готовых скриптов" надо несколько по другому постить. С описанием.
Этак у меня валяется около 2 гегобайт всякой инфы по сфере (почившие и все еще живые шарды). Если все текстовики в отдельных темах забахать будет ужасная свалка.
PS особенно жгут скрипты на НЕ английском языке без описания.

на мой взгляд в тегах [code] вообще не надо в данном разделе постить
прикрепляешь файл, в посте пишешь сопроводительную информацию (автора, способ установки, описание работы скрипта)
любой другой способ превращает раздел в помойку

Размер атачей не позволит запоститься ))

150 мб не хватает для скриптов?

Ты видимо забыл, что этот размер доступен только модератором, а у простых смертных