Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- If GUICtrlRead($MoarDustCheckbox) = 1 Then
- $lModStruct = GetModStruct($lItem)
- If IsMeasureForMeasure($lModStruct) And $lModelID <> $ITEM_ID_CONCH Then ;if it's not a shield with MFM, get MFM off
- GetMFM($bagIndex, $i)
- ElseIf IsMeasureForMeasure($lModStruct) And $lModelID == $ITEM_ID_CONCH Then ;if it's shield with MFM, store
- StoreItem($lItem)
- ContinueLoop
- EndIf
- ;Description; Salvages off the MfM inscription.
- Func GetMFM($aBag, $aSlot)
- Local $lItem
- Local $MFM = "02"
- $lItem = GetItemBySlot($aBag, $aSlot)
- If DllStructGetData($lItem, 'ID') == 0 Then Return
- If FindBigSalvageKit() = 0 Then BuyBigSalvageKit()
- ;salvage out mfm
- sleep(random(600, 900))
- StartSalvage($lItem)
- sleep(random(600, 900))
- SalvageMod($MFM)
- Sleep(800)
- EndFunc ;==>GetMFM
- ;Description; Checks the modStruct to see if an item has a MfM mod on it.
- Func IsMeasureForMeasure($ModStruct)
- Local $Value = 0
- Local $MFM = "1F02"
- Local $ModStr = StringInStr($ModStruct, $MFM, 0, 1)
- If $ModStr > 0 Then Return True
- Return False
- EndFunc ;==>IsMeasureForMeasure
- ;Description: Goes through storage to see if actual inscriptions are there.
- Func FindMeasureForMeasure()
- Local $bag, $numSlots, $lItem, $lModelID
- For $bagIndex = 8 to 11
- $bag = GetBag($bagIndex)
- $numSlots = DllStructGetData($bag, "slots")
- For $i = 1 to $numSlots
- $lItem = GetItemBySlot($bag, $i)
- $lModelID = DllStructGetData($lItem, "ModelID")
- ;If modelID matches, return true
- If $lModelID == $ITEM_ID_MFM_ID Then Return True
- Next
- Next
- Return False
- EndFunc ;==>FindMeasureForMeasure
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement