SHARE
TWEET

Untitled

a guest Jul 24th, 2019 62 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  Func CanPickUp2($aItem)
  2.     Local $M = DllStructGetData($aItem, "ModelID")
  3.     Local $E = DllStructGetData($aItem, "ExtraID")
  4.     Local $A = GetItemAttribute($aitem)
  5.     Local $Req = GetItemReq($aitem)
  6.     Local $R = GetRarity($aItem)
  7.  
  8.     Switch $M
  9.     Case 937, 938, 931, 932
  10.        Return True ; Rare Mats
  11.     Case 935
  12.        $Dias += 1
  13.        GUICtrlSetData($lblDia, "Diamonds: " & $Dias)
  14.        Return True
  15.     Case 936
  16.        $Onyx += 1
  17.        GUICtrlSetData($lblOnyx, "Onyx: " & $Onyx)
  18.        Return True
  19.     Case 146
  20.        If $E = 10 Or $E = 12 Then
  21.           Return True ; Black & White Dyes
  22.        EndIf
  23.     Case 2511
  24.        If GetGoldCharacter() < 99000 Then
  25.           Return True
  26.        EndIf
  27.     Case $Voltaic
  28.        Out("GZ! Voltaic!")
  29.        $Spears += 1
  30.        GUICtrlSetData($lblVolt, "Voltaic's: " & $Spears)
  31.        Return True
  32.     Case 22751 ; Lockpick
  33.        Return True
  34.     EndSwitch
  35.  
  36.     Switch $R
  37.     Case 2624
  38.        Return True
  39.     EndSwitch
  40.  
  41.     Switch $A
  42.     Case 21
  43.        If $Req = 8 And GetItemMaxDmg($aItem) = 16 And $R = 2623 Then
  44.           Return True
  45.        EndIf
  46.        If $Req = 8 And GetItemMaxDmg($aItem) = 16 And $R = 2624 Then
  47.           Return True
  48.        EndIf
  49.     Case 20
  50.        If $Req = 8 And GetItemMaxDmg($aItem) = 22 Then
  51.           Return True
  52.        EndIf
  53.     EndSwitch
  54.     Return False
  55.  EndFunc
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top