If GetUserMap(#PARAM1)=#PARAM2

ChemDamage=Random(1,GetUserMaxHP(#PARAM1))

ChemReduce=Floor(GetUserStrength(#PARAM1)+GetUserAgility(#PARAM1)+GetUserWisdom(#PARAM1)+GetUserEndurance(#PARAM1))/4
ChemReduceMin=Floor(ChemReduce/10)
ChemReduceMax=Floor(ChemReduce/6)
ChemReduceFinal=Random(ChemReduceMin,ChemReduceMax)


SendMessageToMap(#PARAM2,"The Radioactive Waste spews chemicals all over "+GetUserName(#PARAM1)+" and does "+ChemDamage+" damage!", #MSG_CRITICAL)
SendMessageToMap(#PARAM2,GetUserName(#PARAM1)+" is weakened...", #MSG_CRITICAL)

DamageMonster(#PARAM2,8,5000)
SpawnMonster(#PARAM2,88,GetUserX(#PARAM1),GetUserY(#PARAM1))

DamageUser(#PARAM1,ChemDamage)
SetUserStrengthBonus(#PARAM1,GetUserStrengthBonus(#PARAM1)-ChemReduceFinal)
SetUserAgilityBonus(#PARAM1,GetUserAgilityBonus(#PARAM1)-ChemReduceFinal)
SetUserWisdomBonus(#PARAM1,GetUserWisdomBonus(#PARAM1)-ChemReduceFinal)
SetUserEnduranceBonus(#PARAM1,GetUserEnduranceBonus(#PARAM1)-ChemReduceFinal)
SetUserMana(#PARAM1,0)
SetMonsterTarget(#PARAM2,8,#PARAM1)
Timer(285,60000,#PARAM1,ChemReduceFinal,0)

Endif

Continue = 1