Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- ðð®ð¬ð¸ð¶ð¹ð²ðµð®ð ð«ð ð¯ð»ð®ðªð´ð ðð®ð¬ð¸ð¶ð¹ð²ðµð®ð»
- 1.
- 2. local v1 = game
- 4. local v3 = "Players"
- 5.
- 7. v1 = v1:GetService(v3)
- 8. local v0 = v1.LocalPlayer
- 10. v3 = "Data"
- 11.
- 13. v1 = v0:WaitForChild(v3)
- 14. local v4 = "Ally"
- 15.
- 17. v2 = v0:WaitForChild(v4)
- 18. v3 = v0.Character
- 20. if not v3 then goto #25
- 21. v3 = v0.CharacterAdded
- 23.
- 25. v3 = v3:Wait()
- end
- 26. local v6 = "Humanoid"
- 27.
- 29. v4 = v3:WaitForChild(v6)
- 30. local v5 = game
- 32. local v7 = "ReplicatedStorage"
- 33.
- 35. v5 = v5:GetService(v7)
- 36. local v8 = "Remotes"
- 37.
- 39. v6 = v5:WaitForChild(v8)
- 40. v8 = script
- 42. v7 = v8.Parent
- 44. local v9 = "Interface"
- 45.
- 47. v7 = v7:WaitForChild(v9)
- 48. local v10 = "Merchant"
- 49.
- 51. v8 = v7:WaitForChild(v10)
- 52. v9 = {} -- this array is empty
- 54. -- V nested upvalues[0] = v6
- local function ReturnMerchant(p1) -- [line 15]
- 1. local v1 = v6 -- get upval
- 2. local v3 = "ReturnMerchant"
- 3.
- 5. v1 = v1:WaitForChild(v3)
- 6. v3 = p1
- 7.
- 9. v1 = v1:InvokeServer(v3)
- 10. return v1
- end
- [DUPCLOSURE] v10 = ReturnMerchant
- 55. CAPTURE VAL R6
- 56. ReturnMerchant = v13
- 58. v13 = {} -- this array is empty
- 60. local v14 = ""
- 61. local v15 = ""
- 62. local v16 = nil
- 63. local v17 = {} -- this array is empty
- 65. local v18 = "Craft"
- 66. v17.Valefor = v18
- 68. v18 = "Melt"
- 69. v17.Furnace = v18
- 71. -- V nested upvalues[0] = v8
- -- V nested upvalues[1] = v5
- -- V nested upvalues[2] = v14
- -- V nested upvalues[3] = v13
- -- V nested upvalues[4] = v12
- -- V nested upvalues[5] = v6
- -- V nested upvalues[6] = v11
- local function Select(p2, p3, p4) -- [line 31]
- 1. local v5 = v8 -- get upval
- 2. local v4 = v5.Fn
- 4. v5 = require
- 6. local v6 = v5 -- get upval
- 7. local v8 = "UseItemSetting"
- 8.
- 10. v5 = v6:WaitForChild(v8)
- 11. v5 = v5()
- 12. local v7 = v14 -- get upval
- 13. local v11 = v8 -- get upval
- 14. local v10 = v11.NameFrame
- 16. local v9 = v10.TextLabel
- 18. v8 = v9.Text
- 20. v6 = v7[v8]
- 21. if v6 then goto #39
- 22. v8 = v4.Trade
- 24. v7 = v8.Trade
- 26. v6 = v7.TextLabel
- 28. v8 = v14 -- get upval
- 29. local v12 = v8 -- get upval
- 30. v11 = v12.NameFrame
- 32. v10 = v11.TextLabel
- 34. v9 = v10.Text
- 36. v7 = v8[v9]
- 37. v6.Text = v7
- 39. goto #48
- else
- 40. v8 = v4.Trade
- 42. v7 = v8.Trade
- 44. v6 = v7.TextLabel
- 46. v7 = "Trade"
- 47. v6.Text = v7
- end
- 49. v6 = v13 -- get upval
- 50. if v6 ~= nil then goto #55
- 52. v6 = v13 -- get upval
- 53.
- 55. v6:Disconnect()
- end
- 56. v6 = pairs
- 58. v7 = v4.RequireFrame
- 60.
- 62. v6 = v7:GetChildren()
- 63. v6, v7, v8 = v6()
- 64. for v9, v10 in v6(v7) do -- [escape at #83] (pairs/next)
- 65. local v13 = "Frame"
- 66.
- 68. v11 = v10:IsA(v13)
- 69. if not v11 then goto #79
- 70. v13 = "ViewportFrame"
- 71.
- 73. v11 = v10:IsA(v13)
- 74. if not v11 then goto #79
- 75. v13 = "TextButton"
- 76.
- 78. v11 = v10:IsA(v13)
- 79. if v11 then goto #82
- end
- end
- 80.
- 82. v10:Destroy()
- end
- 83. end -- FORGLOOP - iterate + goto #64
- 85. v6 = p4.Gem
- 87. if v6 then goto #124
- 88. v8 = v5 -- get upval
- 89. v7 = v8.Assets
- 91. v6 = v7.ValueItemReq
- 93.
- 95. v6 = v6:Clone()
- 96. v7 = v4.RequireFrame
- 98. v6.Parent = v7
- 100. v7 = v6.TextLabel
- 102. v9 = "[Gem] : "
- 103. v11 = p4.Gem
- 105. FASTCALL[tostring](v11)
- 106. v10 = tostring
- 108. v10 = v10(v11)
- 109. v8 = v9 .. v10
- 110. v7.Text = v8
- 112. v9 = v5 -- get upval
- 113. v8 = v9.Assets
- 115. v7 = v8.Gem
- 117.
- 119. v7 = v7:Clone()
- 120. v8 = v6.TextLabel
- 122. v7.Parent = v8
- 124. goto #163
- elseif
- 125. v6 = p4.Beli
- 127. if v6 then goto #163
- 128. v8 = v5 -- get upval
- 129. v7 = v8.Assets
- 131. v6 = v7.ValueItemReq
- 133.
- 135. v6 = v6:Clone()
- 136. v7 = v4.RequireFrame
- 138. v6.Parent = v7
- 140. v7 = v6.TextLabel
- 142. v9 = "[$] : "
- 143. v11 = p4.Beli
- 145. FASTCALL[tostring](v11)
- 146. v10 = tostring
- 148. v10 = v10(v11)
- 149. v8 = v9 .. v10
- 150. v7.Text = v8
- 152. v9 = v5 -- get upval
- 153. v8 = v9.Assets
- 155. v7 = v8.Beli
- 157.
- 159. v7 = v7:Clone()
- 160. v8 = v6.TextLabel
- 162. v7.Parent = v8
- end
- 164. v6 = {} -- this array is empty
- 166. v7 = pairs
- 168. v8 = p4.Item
- 170. v7, v8, v9 = v7(v8)
- 171. for v10, v11 in v7(v8) do -- [escape at #262] (pairs/next)
- 172. local v14 = 1
- 173. v12 = v11
- 174. v13 = 1
- 175. for v14 = v14, v12, v13 do -- [escape at #261]
- 176. local v15 = v6[v10]
- 177. if not v15 then goto #236
- 178. v15 = 1
- 179. v6[v10] = v15
- 180. local v17 = v5 -- get upval
- 181. local v16 = v17.Assets
- 183. v15 = v16.ItemReqFrame
- 185.
- 187. v15 = v15:Clone()
- 188. v16 = v4.RequireFrame
- 190. v15.Parent = v16
- 192. v15.Name = v10
- 194. v17 = v5 -- get upval
- 195. v16 = v17.ItemHandle
- 197. local v20 = v5[v10]
- 198. local v19 = v20.Name
- 200. FASTCALL[tostring](v19)
- 201. local v18 = tostring
- 203. v18 = v18(v19)
- 204.
- 206. v16 = v16:FindFirstChild(v18)
- 207. if v16 then goto #216
- 208.
- 210. v17 = v16:Clone()
- 211. v19 = v15.ViewportFrame
- 213. v18 = v19.WorldModel
- 215. v17.Parent = v18
- end
- 217. v17 = v15.Amount
- 219. v19 = "[X"
- 220. v20 = v6[v10]
- 221. local v21 = "]"
- 222. v18 = v19 .. v20 .. v21
- 223. v17.Text = v18
- 225. v17 = v15.TextLabel
- 227. v20 = v5[v10]
- 228. v19 = v20.Name
- 230. FASTCALL[tostring](v19)
- 231. v18 = tostring
- 233. v18 = v18(v19)
- 234. v17.Text = v18
- 236. goto #260
- elseif
- 237. v15 = v6[v10]
- 238. if v15 then goto #260
- 239. v15 = v4.RequireFrame
- 241. FASTCALL[tostring](v10)
- 242. v18 = v10
- 243. v17 = tostring
- 245. v17 = v17(v18)
- 246.
- 248. v15 = v15:FindFirstChild(v17)
- 249. if v15 then goto #260
- 250. v16 = v6[v10]
- 251. v16 = v16 + 1
- 252. v6[v10] = v16
- 253. v16 = v15.Amount
- 255. v18 = "[X"
- 256. v19 = v6[v10]
- 257. v20 = "]"
- 258. v17 = v18 .. v19 .. v20
- 259. v16.Text = v17
- end
- end
- 261. end -- FORNLOOP end - iterate + goto #175
- 262. end -- FORGLOOP - iterate + goto #171
- 264. v7 = v12 -- get upval
- 265. if p2 ~= v7 then goto #287
- 267. v12 = p2 -- set upval
- 268. v7 = true
- 269. v4.Visible = v7
- 271. v9 = v4.Trade
- 273. v8 = v9.Trade
- 275. v7 = v8.MouseButton1Click
- 277. -- V nested upvalues[0] = upvalues[4]
- -- V nested upvalues[1] = v1
- -- V nested upvalues[2] = upvalues[5]
- -- V nested upvalues[3] = upvalues[6]
- -- V nested upvalues[4] = p2
- [NEWCLOSURE] v9 = function() -- [line 95]
- 1. local v5 = ""
- 2. upvalues[4] = v5 -- set upval
- 3. v5 = v1 -- get upval
- 4. local v6 = false
- 5. v5.Visible = v6
- 7. v6 = upvalues[5] -- get upval
- 8. v5 = v6.BuyItem
- 10. local v7 = upvalues[6] -- get upval
- 11. local v8 = p2 -- get upval
- 12.
- 14. v5:FireServer(v7, v8)
- 15. return
- end
- 278. CAPTURE UPVAL U4
- 279. CAPTURE VAL R3
- 280. CAPTURE UPVAL U5
- 281. CAPTURE UPVAL U6
- 282. CAPTURE VAL R0
- 283.
- 285. v14 = v14:Connect(v16)
- 286. v13 = v14 -- set upval
- 287. return
- end
- 288. v14 = v12 -- get upval
- 289. if p2 == v14 then goto #295
- 291. v14 = false
- 292. v11.Visible = v14
- 294. v14 = ""
- 295. v12 = v14 -- set upval
- end
- 296. return
- end
- [NEWCLOSURE] v25 = Select
- 72. CAPTURE VAL R8
- 73. CAPTURE VAL R5
- 74. CAPTURE VAL R14
- 75. CAPTURE REF R13
- 76. CAPTURE REF R12
- 77. CAPTURE VAL R6
- 78. CAPTURE REF R11
- 79. Select = v131
- 81. -- V nested upvalues[0] = v8
- -- V nested upvalues[1] = v11
- -- V nested upvalues[2] = v5
- -- V nested upvalues[3] = v10
- local function MerchantUpdate(p5) -- [line 106]
- 1. local v117 = ReturnMerchant
- 3. local v118 = p5
- 4. v117 = v117(v118)
- 5. local v120 = v8 -- get upval
- 6. local v119 = v120.NameFrame
- 8. v118 = v119.TextLabel
- 10. FASTCALL[tostring](p5)
- 11. v120 = p5
- 12. v119 = tostring
- 14. v119 = v119(v120)
- 15. v118.Text = v119
- 17. FASTCALL[tostring](p5)
- 18. v119 = p5
- 19. v118 = tostring
- 21. v118 = v118(v119)
- 22. v11 = v118 -- set upval
- 23. v118 = {} -- this array is empty
- 25. v119 = require
- 27. v120 = v5 -- get upval
- 28. local v122 = "UseItemSetting"
- 29.
- 31. v119 = v120:WaitForChild(v122)
- 32. v119 = v119()
- 33. v120 = pairs
- 35. local v121 = v10 -- get upval
- 36. v120, v121, v122 = v120(v121)
- 37. for v123, v124 in v120(v121) do -- [escape at #41] (pairs/next)
- 38.
- 40. v124:Disconnect()
- 41. end -- FORGLOOP - iterate + goto #37
- 43. v120 = pairs
- 45. v122 = v8 -- get upval
- 46. v121 = v122.ItemFrame
- 48.
- 50. v120 = v121:GetChildren()
- 51. v120, v121, v122 = v120()
- 52. for v123, v124 in v120(v121) do -- [escape at #61] (pairs/next)
- 53. local v127 = "TextButton"
- 54.
- 56. v125 = v124:IsA(v127)
- 57. if v125 then goto #60
- 58.
- 60. v124:Destroy()
- end
- 61. end -- FORGLOOP - iterate + goto #52
- 63. v120 = pairs
- 65. v121 = v117
- 66. v120, v121, v122 = v120(v121)
- 67. for v123, v124 in v120(v121) do -- [escape at #89] (pairs/next)
- 68. local v125 = v124.Sold
- 70. if v125 then goto #88
- 71. local v126 = v8 -- get upval
- 72. v125 = v126.ItemFrame
- 74. v127 = v123
- 75.
- 77. v125 = v125:FindFirstChild(v127)
- 78. if v125 then goto #88
- 79. v126 = v8 -- get upval
- 80. v125 = v126.ItemFrame
- 82. v127 = v123
- 83.
- 85. v125 = v125:FindFirstChild(v127)
- 86.
- 88. v125:Destroy()
- end
- end
- 89. end -- FORGLOOP - iterate + goto #67
- 91. v120 = pairs
- 93. v121 = v117
- 94. v120, v121, v122 = v120(v121)
- 95. for v123, v124 in v120(v121) do -- [escape at #214] (pairs/next)
- 96. v125 = true
- 97. v118[v123] = v125
- 98. v126 = v8 -- get upval
- 99. v125 = v126.ItemFrame
- 101. FASTCALL[tostring](v123)
- 102. local v128 = v123
- 103. v127 = tostring
- 105. v127 = v127(v128)
- 106.
- 108. v125 = v125:FindFirstChild(v127)
- 109. if v125 then goto #128
- 110. v125 = v10 -- get upval
- 111. local v129 = v8 -- get upval
- 112. v128 = v129.ItemFrame
- 114. FASTCALL[tostring](v123)
- 115. local v130 = v123
- 116. v129 = tostring
- 118. v129 = v129(v130)
- 119. v127 = v128[v129]
- 120. v126 = v127.MouseButton1Click
- 122. -- V nested upvalues[0] = v7
- -- V nested upvalues[1] = v8
- [NEWCLOSURE] v128 = function() -- [line 128]
- 1. local v118 = Select
- 3. local v119 = v7 -- get upval
- 4. local v120 = "Item"
- 5. local v121 = v8 -- get upval
- 6. v118(v119, v120, v121)
- 7. return
- end
- 123. CAPTURE VAL R7
- 124. CAPTURE VAL R8
- 125.
- 127. v130 = v130:Connect(v132)
- 128. v129[v127] = v130
- end
- 129. v130 = v8 -- get upval
- 130. v129 = v130.ItemFrame
- 132. v131 = v127
- 133.
- 135. v129 = v129:FindFirstChild(v131)
- 136. if not v129 then goto #213
- 137. v129 = v128.Sold
- 139. if not v129 then goto #213
- 140. v129 = v5 -- get upval
- 141. v131 = "Assets"
- 142.
- 144. v129 = v129:WaitForChild(v131)
- 145. v131 = "MerchantFrame"
- 146.
- 148. v129 = v129:FindFirstChild(v131)
- 149.
- 151. v129 = v129:Clone()
- 152. v131 = v8 -- get upval
- 153. v130 = v131.ItemFrame
- 155. v129.Parent = v130
- 157. v130 = warn
- 159. v131 = v127
- 160. v130(v131)
- 161. v132 = v123[v127]
- 162. v131 = v132.Name
- 164. FASTCALL[tostring](v131)
- 165. v130 = tostring
- 167. v130 = v130(v131)
- 168. v129.Name = v130
- 170. v130 = v129.TextLabel
- 172. v133 = v123[v127]
- 173. v132 = v133.Name
- 175. FASTCALL[tostring](v132)
- 176. v131 = tostring
- 178. v131 = v131(v132)
- 179. v130.Text = v131
- 181. v131 = v5 -- get upval
- 182. v130 = v131.ItemHandle
- 184. v134 = v123[v127]
- 185. v133 = v134.Name
- 187. FASTCALL[tostring](v133)
- 188. v132 = tostring
- 190. v132 = v132(v133)
- 191.
- 193. v130 = v130:FindFirstChild(v132)
- 194. if v130 then goto #213
- 195.
- 197. v131 = v130:Clone()
- 198. v133 = v129.ViewportFrame
- 200. v132 = v133.WorldModel
- 202. v131.Parent = v132
- 204. v132 = v10 -- get upval
- 205. v133 = v129.MouseButton1Click
- 207. -- V nested upvalues[0] = v7
- -- V nested upvalues[1] = v8
- [NEWCLOSURE] v135 = function() -- [line 145]
- 1. local v122 = Select
- 3. local v123 = v7 -- get upval
- 4. local v124 = "Item"
- 5. local v125 = v8 -- get upval
- 6. v122(v123, v124, v125)
- 7. return
- end
- 208. CAPTURE VAL R7
- 209. CAPTURE VAL R8
- 210.
- 212. v137 = v137:Connect(v139)
- 213. v136[v131] = v137
- end
- end
- end
- 214. end -- FORGLOOP - iterate + goto #95
- 216. return
- end
- [NEWCLOSURE] v139 = MerchantUpdate
- 82. CAPTURE VAL R8
- 83. CAPTURE REF R11
- 84. CAPTURE VAL R5
- 85. CAPTURE VAL R10
- 86. MerchantUpdate = v208
- 88. local v209 = v199.GetMerchant
- 90. v208 = v209.OnClientEvent
- 92. -- V nested upvalues[0] = v12
- -- V nested upvalues[1] = v11
- -- V nested upvalues[2] = v13
- [NEWCLOSURE] v210 = function(p6) -- [line 154]
- 1. local v194 = ""
- 2. v12 = v194 -- set upval
- 3. v194 = ""
- 4. v11 = v194 -- set upval
- 5. v194 = nil
- 6. v13 = v194 -- set upval
- 7. v194 = MerchantUpdate
- 9. FASTCALL[tostring](p6)
- 10. local v196 = p6
- 11. local v195 = tostring
- 13. v195 = v195(v196)
- 14. v194(v195)
- 15. v195 = script
- 17. v194 = v195.Parent
- 19. v195 = true
- 20. v194.Enabled = v195
- 22. return
- end
- 93. CAPTURE REF R12
- 94. CAPTURE REF R11
- 95. CAPTURE REF R13
- 96.
- 98. v217:Connect(v219)
- 99. v218 = v208.GlobalMerchant
- 101. v217 = v218.OnClientEvent
- 103. -- V nested upvalues[0] = v11
- -- V nested upvalues[1] = v12
- -- V nested upvalues[2] = v13
- [NEWCLOSURE] v219 = function(p7) -- [line 160]
- 1. local v203 = v11 -- get upval
- 2. if v203 == p7 then goto #13
- 4. v203 = ""
- 5. v12 = v203 -- set upval
- 6. v203 = ""
- 7. v11 = v203 -- set upval
- 8. v203 = nil
- 9. v13 = v203 -- set upval
- 10. v203 = MerchantUpdate
- 12. local v204 = p7
- 13. v203(v204)
- end
- 14. return
- end
- 104. CAPTURE REF R11
- 105. CAPTURE REF R12
- 106. CAPTURE REF R13
- 107.
- 109. v223:Connect(v225)
- 110. local v225 = v216.Close
- 112. v224 = v225.Close
- 114. v223 = v224.MouseButton1Click
- 116. -- V nested upvalues[0] = v12
- -- V nested upvalues[1] = v11
- -- V nested upvalues[2] = v13
- -- V nested upvalues[3] = v8
- [NEWCLOSURE] v225 = function() -- [line 167]
- 1. local v209 = ""
- 2. v12 = v209 -- set upval
- 3. v209 = ""
- 4. v11 = v209 -- set upval
- 5. v209 = nil
- 6. v13 = v209 -- set upval
- 7. local v210 = v8 -- get upval
- 8. v209 = v210.Fn
- 10. v210 = false
- 11. v209.Visible = v210
- 13. v210 = script
- 15. v209 = v210.Parent
- 17. v210 = false
- 18. v209.Enabled = v210
- 20. return
- end
- 117. CAPTURE REF R12
- 118. CAPTURE REF R11
- 119. CAPTURE REF R13
- 120. CAPTURE VAL R8
- 121.
- 123. v232:Connect(v234)
- 124. [CLOSEUPVALS]: clear captures from back until: 11
- 125. return
Advertisement
Add Comment
Please, Sign In to add comment