API tools faq
paste
Guest User

Untitled

a guest
Sep 3rd, 2016
86
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 16.95 KB | None | 0 0
raw download clone embed print report
  1. local DataStore = game:GetService("DataStoreService"):GetDataStore("Business1")
  2.  
  3. game.Players.PlayerAdded:connect(function(newPlayer)
  4. local Business = Instance.new("Folder")
  5. Business.Name = "BusinessStats"
  6.  
  7. local Playerbusiness = Instance.new("Folder")
  8. Playerbusiness.Name = "PlayerBusinessStats"
  9.  
  10. local Employee = Instance.new("Folder")
  11. Employee.Name = "Employee"
  12.  
  13. local HB = Instance.new("BoolValue")
  14. HB.Name = "HasBusiness"
  15. HB.Value = false
  16.  
  17. local Employed = Instance.new("BoolValue")
  18. Employed.Name = "Employed"
  19. Employed.Value = false
  20. ------------------------------------
  21. --Your Company
  22. local YName = Instance.new("StringValue")
  23. YName.Name = "CName"
  24. YName.Value = ""
  25.  
  26. local Icon = Instance.new("NumberValue")
  27. Icon.Name = "Icon"
  28. Icon.Value = "0"
  29.  
  30. local CEO = Instance.new("StringValue")
  31. CEO.Name = "CEO"
  32. CEO.Value = ""
  33.  
  34. local Members = Instance.new("Folder")
  35. Members.Name = "Members"
  36.  
  37. local employee = Instance.new("Folder")
  38. employee.Name = "Employee"
  39.  
  40. local Secretary = Instance.new("Folder")
  41. Secretary.Name = "Secretary"
  42. ---------Roles
  43. local S1 = Instance.new("StringValue")
  44. S1.Name = "S1"
  45. S1.Value = ""
  46.  
  47. local S2 = Instance.new("StringValue")
  48. S2.Name = "S2"
  49. S2.Value = ""
  50.  
  51. local S3 = Instance.new("StringValue")
  52. S3.Name = "S3"
  53. S3.Value = ""
  54.  
  55. local S4 = Instance.new("StringValue")
  56. S4.Name = "S4"
  57. S4.Value = ""
  58.  
  59. local S5 = Instance.new("StringValue")
  60. S5.Name = "S5"
  61. S5.Value = ""
  62.  
  63. local S6 = Instance.new("StringValue")
  64. S6.Name = "S6"
  65. S6.Value = ""
  66.  
  67. local S7 = Instance.new("StringValue")
  68. S7.Name = "S7"
  69. S7.Value = ""
  70.  
  71. local S8 = Instance.new("StringValue")
  72. S8.Name = "S8"
  73. S8.Value = ""
  74.  
  75. local S9 = Instance.new("StringValue")
  76. S9.Name = "S9"
  77. S9.Value = ""
  78.  
  79. local S10 = Instance.new("StringValue")
  80. S10.Name = "S10"
  81. S10.Value = ""
  82.  
  83. local S11 = Instance.new("StringValue")
  84. S11.Name = "S11"
  85. S11.Value = ""
  86.  
  87. local S12 = Instance.new("StringValue")
  88. S12.Name = "S12"
  89. S12.Value = ""
  90.  
  91. local S13 = Instance.new("StringValue")
  92. S13.Name = "S13"
  93. S13.Value = ""
  94.  
  95. local S14 = Instance.new("StringValue")
  96. S14.Name = "S14"
  97. S14.Value = ""
  98.  
  99. local S15 = Instance.new("StringValue")
  100. S15.Name = "S15"
  101. S15.Value = ""
  102.  
  103. local S16 = Instance.new("StringValue")
  104. S16.Name = "S16"
  105. S16.Value = ""
  106.  
  107. local S17 = Instance.new("StringValue")
  108. S17.Name = "S17"
  109. S17.Value = ""
  110.  
  111. local S18 = Instance.new("StringValue")
  112. S18.Name = "S18"
  113. S18.Value = ""
  114.  
  115. local S19 = Instance.new("StringValue")
  116. S19.Name = "S19"
  117. S19.Value = ""
  118.  
  119. local S20 = Instance.new("StringValue")
  120. S20.Name = "S20"
  121. S20.Value = ""
  122.  
  123. local S21 = Instance.new("StringValue")
  124. S21.Name = "S21"
  125. S21.Value = ""
  126.  
  127. local S22 = Instance.new("StringValue")
  128. S22.Name = "S22"
  129. S22.Value = ""
  130.  
  131. local S23 = Instance.new("StringValue")
  132. S23.Name = "S23"
  133. S23.Value = ""
  134.  
  135. local S24 = Instance.new("StringValue")
  136. S24.Name = "S24"
  137. S24.Value = ""
  138.  
  139. local S25 = Instance.new("StringValue")
  140. S25.Name = "S25"
  141. S25.Value = ""
  142. ------------------------------------
  143. local E1 = Instance.new("StringValue")
  144. E1.Name = "E1"
  145. E1.Value = ""
  146.  
  147. local E2 = Instance.new("StringValue")
  148. E2.Name = "E2"
  149. E2.Value = ""
  150.  
  151. local E3 = Instance.new("StringValue")
  152. E3.Name = "E3"
  153. E3.Value = ""
  154.  
  155. local E4 = Instance.new("StringValue")
  156. E4.Name = "E4"
  157. E4.Value = ""
  158.  
  159. local E5 = Instance.new("StringValue")
  160. E5.Name = "E5"
  161. E5.Value = ""
  162.  
  163. local E6 = Instance.new("StringValue")
  164. E6.Name = "E6"
  165. E6.Value = ""
  166.  
  167. local E7 = Instance.new("StringValue")
  168. E7.Name = "E7"
  169. E7.Value = ""
  170.  
  171. local E8 = Instance.new("StringValue")
  172. E8.Name = "E8"
  173. E8.Value = ""
  174.  
  175. local E9 = Instance.new("StringValue")
  176. E9.Name = "E9"
  177. E9.Value = ""
  178.  
  179. local E10 = Instance.new("StringValue")
  180. E10.Name = "E10"
  181. E10.Value = ""
  182.  
  183. local E11 = Instance.new("StringValue")
  184. E11.Name = "E11"
  185. E11.Value = ""
  186.  
  187. local E12 = Instance.new("StringValue")
  188. E12.Name = "E12"
  189. E12.Value = ""
  190.  
  191. local E13 = Instance.new("StringValue")
  192. E13.Name = "E13"
  193. E13.Value = ""
  194.  
  195. local E14 = Instance.new("StringValue")
  196. E14.Name = "E14"
  197. E14.Value = ""
  198.  
  199. local E15 = Instance.new("StringValue")
  200. E15.Name = "E15"
  201. E15.Value = ""
  202.  
  203. local E16 = Instance.new("StringValue")
  204. E16.Name = "E16"
  205. E16.Value = ""
  206.  
  207. local E17 = Instance.new("StringValue")
  208. E17.Name = "E17"
  209. E17.Value = ""
  210.  
  211. local E18 = Instance.new("StringValue")
  212. E18.Name = "E18"
  213. E18.Value = ""
  214.  
  215. local E19 = Instance.new("StringValue")
  216. E19.Name = "E19"
  217. E19.Value = ""
  218.  
  219. local E20 = Instance.new("StringValue")
  220. E20.Name = "E20"
  221. E20.Value = ""
  222.  
  223. local E21 = Instance.new("StringValue")
  224. E21.Name = "E21"
  225. E21.Value = ""
  226.  
  227. local E22 = Instance.new("StringValue")
  228. E22.Name = "E22"
  229. E22.Value = ""
  230.  
  231. local E23 = Instance.new("StringValue")
  232. E23.Name = "E23"
  233. E23.Value = ""
  234.  
  235. local E24 = Instance.new("StringValue")
  236. E24.Name = "E24"
  237. E24.Value = ""
  238.  
  239. local E25 = Instance.new("StringValue")
  240. E25.Name = "E25"
  241. E25.Value = ""
  242. ------------------------------------
  243. --Employed Company
  244. local EName = Instance.new("StringValue")
  245. EName.Name = "CName"
  246. EName.Value = ""
  247.  
  248. local EIcon = Instance.new("NumberValue")
  249. EIcon.Name = "Icon"
  250. EIcon.Value = "0"
  251.  
  252. local Role = Instance.new("StringValue")
  253. Role.Name = "Role"
  254. Role.Value = ""
  255.  
  256. local ECEO = Instance.new("StringValue")
  257. ECEO.Name = "CEO"
  258. ECEO.Value = ""
  259. ------------------------------------
  260. Business.Parent = newPlayer
  261. Playerbusiness.Parent = newPlayer.BusinessStats
  262. Employee.Parent = newPlayer.BusinessStats
  263.  
  264. local BusinessP = newPlayer.BusinessStats
  265. local PlayerbusinessP = newPlayer.BusinessStats.PlayerBusinessStats
  266. local EmployeeP = newPlayer.BusinessStats.Employee
  267. -----Business Folder
  268. Employed.Parent = BusinessP
  269. HB.Parent = BusinessP
  270. -----Your Company Folder
  271. YName.Parent = PlayerbusinessP
  272. Icon.Parent = PlayerbusinessP
  273. Members.Parent = PlayerbusinessP
  274. CEO.Parent = PlayerbusinessP
  275. employee.Parent = PlayerbusinessP.Members
  276. Secretary.Parent = PlayerbusinessP.Members
  277. ----Ranks
  278. S1.Parent = PlayerbusinessP.Members.Secretary
  279. S2.Parent = PlayerbusinessP.Members.Secretary
  280. S3.Parent = PlayerbusinessP.Members.Secretary
  281. S4.Parent = PlayerbusinessP.Members.Secretary
  282. S5.Parent = PlayerbusinessP.Members.Secretary
  283. S6.Parent = PlayerbusinessP.Members.Secretary
  284. S7.Parent = PlayerbusinessP.Members.Secretary
  285. S8.Parent = PlayerbusinessP.Members.Secretary
  286. S9.Parent = PlayerbusinessP.Members.Secretary
  287. S10.Parent = PlayerbusinessP.Members.Secretary
  288. S11.Parent = PlayerbusinessP.Members.Secretary
  289. S12.Parent = PlayerbusinessP.Members.Secretary
  290. S13.Parent = PlayerbusinessP.Members.Secretary
  291. S14.Parent = PlayerbusinessP.Members.Secretary
  292. S15.Parent = PlayerbusinessP.Members.Secretary
  293. S16.Parent = PlayerbusinessP.Members.Secretary
  294. S17.Parent = PlayerbusinessP.Members.Secretary
  295. S18.Parent = PlayerbusinessP.Members.Secretary
  296. S19.Parent = PlayerbusinessP.Members.Secretary
  297. S20.Parent = PlayerbusinessP.Members.Secretary
  298. S21.Parent = PlayerbusinessP.Members.Secretary
  299. S22.Parent = PlayerbusinessP.Members.Secretary
  300. S23.Parent = PlayerbusinessP.Members.Secretary
  301. S24.Parent = PlayerbusinessP.Members.Secretary
  302. S25.Parent = PlayerbusinessP.Members.Secretary
  303. --------------
  304. E1.Parent = PlayerbusinessP.Members.Employee
  305. E2.Parent = PlayerbusinessP.Members.Employee
  306. E3.Parent = PlayerbusinessP.Members.Employee
  307. E4.Parent = PlayerbusinessP.Members.Employee
  308. E5.Parent = PlayerbusinessP.Members.Employee
  309. E6.Parent = PlayerbusinessP.Members.Employee
  310. E7.Parent = PlayerbusinessP.Members.Employee
  311. E8.Parent = PlayerbusinessP.Members.Employee
  312. E9.Parent = PlayerbusinessP.Members.Employee
  313. E10.Parent = PlayerbusinessP.Members.Employee
  314. E11.Parent = PlayerbusinessP.Members.Employee
  315. E12.Parent = PlayerbusinessP.Members.Employee
  316. E13.Parent = PlayerbusinessP.Members.Employee
  317. E14.Parent = PlayerbusinessP.Members.Employee
  318. E15.Parent = PlayerbusinessP.Members.Employee
  319. E16.Parent = PlayerbusinessP.Members.Employee
  320. E17.Parent = PlayerbusinessP.Members.Employee
  321. E18.Parent = PlayerbusinessP.Members.Employee
  322. E19.Parent = PlayerbusinessP.Members.Employee
  323. E20.Parent = PlayerbusinessP.Members.Employee
  324. E21.Parent = PlayerbusinessP.Members.Employee
  325. E22.Parent = PlayerbusinessP.Members.Employee
  326. E23.Parent = PlayerbusinessP.Members.Employee
  327. E24.Parent = PlayerbusinessP.Members.Employee
  328. E25.Parent = PlayerbusinessP.Members.Employee
  329. -----Employed Company Folder
  330. EName.Parent = EmployeeP
  331. EIcon.Parent = EmployeeP
  332. Role.Parent = EmployeeP
  333. ECEO.Parent = EmployeeP
  334.  
  335. local key = "player-business"..newPlayer.userId.."-mtsm"
  336.  
  337. local savedStats = DataStore:GetAsync(key)
  338.  
  339. if savedStats then
  340. --Save Format: {HasHome,Something}
  341. -----Business Folder
  342. BusinessP.Employed.Value = savedStats[1]
  343. BusinessP.HasBusiness.Value = savedStats[2]
  344. -----Employed Company Folder
  345. EmployeeP.CName.Value = savedStats[3]
  346. EmployeeP.Icon.Value = savedStats[4]
  347. EmployeeP.Role.Value = savedStats[5]
  348. EmployeeP.CEO.Value = savedStats[6]
  349. -----Your Company Folder
  350. PlayerbusinessP.CName.Value = savedStats[7]
  351. PlayerbusinessP.Icon.Value = savedStats[8]
  352. PlayerbusinessP.CEO.Value = savedStats[9]
  353. -------------------------------
  354. PlayerbusinessP.Members.Secretary.S1.Value = savedStats[10]
  355. PlayerbusinessP.Members.Secretary.S2.Value = savedStats[11]
  356. PlayerbusinessP.Members.Secretary.S3.Value = savedStats[12]
  357. PlayerbusinessP.Members.Secretary.S4.Value = savedStats[13]
  358. PlayerbusinessP.Members.Secretary.S5.Value = savedStats[14]
  359. PlayerbusinessP.Members.Secretary.S6.Value = savedStats[15]
  360. PlayerbusinessP.Members.Secretary.S7.Value = savedStats[16]
  361. PlayerbusinessP.Members.Secretary.S8.Value = savedStats[17]
  362. PlayerbusinessP.Members.Secretary.S9.Value = savedStats[18]
  363. PlayerbusinessP.Members.Secretary.S10.Value = savedStats[19]
  364. PlayerbusinessP.Members.Secretary.S11.Value = savedStats[20]
  365. PlayerbusinessP.Members.Secretary.S12.Value = savedStats[21]
  366. PlayerbusinessP.Members.Secretary.S13.Value = savedStats[22]
  367. PlayerbusinessP.Members.Secretary.S14.Value = savedStats[23]
  368. PlayerbusinessP.Members.Secretary.S15.Value = savedStats[24]
  369. PlayerbusinessP.Members.Secretary.S16.Value = savedStats[25]
  370. PlayerbusinessP.Members.Secretary.S17.Value = savedStats[26]
  371. PlayerbusinessP.Members.Secretary.S18.Value = savedStats[27]
  372. PlayerbusinessP.Members.Secretary.S19.Value = savedStats[28]
  373. PlayerbusinessP.Members.Secretary.S20.Value = savedStats[29]
  374. PlayerbusinessP.Members.Secretary.S21.Value = savedStats[30]
  375. PlayerbusinessP.Members.Secretary.S22.Value = savedStats[31]
  376. PlayerbusinessP.Members.Secretary.S23.Value = savedStats[32]
  377. PlayerbusinessP.Members.Secretary.S24.Value = savedStats[33]
  378. PlayerbusinessP.Members.Secretary.S25.Value = savedStats[34]
  379. -------------------------------------
  380. PlayerbusinessP.Members.Employee.E1.Value = savedStats[35]
  381. PlayerbusinessP.Members.Employee.E2.Value = savedStats[36]
  382. PlayerbusinessP.Members.Employee.E3.Value = savedStats[37]
  383. PlayerbusinessP.Members.Employee.E4.Value = savedStats[38]
  384. PlayerbusinessP.Members.Employee.E5.Value = savedStats[39]
  385. PlayerbusinessP.Members.Employee.E6.Value = savedStats[40]
  386. PlayerbusinessP.Members.Employee.E7.Value = savedStats[41]
  387. PlayerbusinessP.Members.Employee.E8.Value = savedStats[42]
  388. PlayerbusinessP.Members.Employee.E9.Value = savedStats[43]
  389. PlayerbusinessP.Members.Employee.E10.Value = savedStats[44]
  390. PlayerbusinessP.Members.Employee.E11.Value = savedStats[45]
  391. PlayerbusinessP.Members.Employee.E12.Value = savedStats[46]
  392. PlayerbusinessP.Members.Employee.E13.Value = savedStats[47]
  393. PlayerbusinessP.Members.Employee.E14.Value = savedStats[48]
  394. PlayerbusinessP.Members.Employee.E15.Value = savedStats[49]
  395. PlayerbusinessP.Members.Employee.E16.Value = savedStats[50]
  396. PlayerbusinessP.Members.Employee.E17.Value = savedStats[51]
  397. PlayerbusinessP.Members.Employee.E18.Value = savedStats[52]
  398. PlayerbusinessP.Members.Employee.E19.Value = savedStats[53]
  399. PlayerbusinessP.Members.Employee.E20.Value = savedStats[54]
  400. PlayerbusinessP.Members.Employee.E21.Value = savedStats[55]
  401. PlayerbusinessP.Members.Employee.E22.Value = savedStats[56]
  402. PlayerbusinessP.Members.Employee.E23.Value = savedStats[57]
  403. PlayerbusinessP.Members.Employee.E24.Value = savedStats[58]
  404. PlayerbusinessP.Members.Employee.E25.Value = savedStats[59]
  405. else
  406. local ToSave = {Employed.Value, HB.Value, YName.Value, Icon.Value, EName.Value, EIcon.Value, Role.Value, CEO.Value, ECEO.Value, E1.Value, E2.Value, E3.Value, E4.Value, E5.Value, E6.Value, E7.Value, E8.Value, E9.Value, E10.Value, E11.Value, E12.Value, E13.Value, E14.Value, E15.Value, E16.Value, E17.Value, E18.Value, E19.Value, E20.Value, E21.Value, E22.Value, E23.Value, E24.Value, E25.Value, S1.Value, S2.Value, S3.Value, S4.Value, S5.Value, S6.Value, S7.Value, S8.Value, S9.Value, S10.Value, S11.Value, S12.Value, S13.Value, S14.Value, S15.Value, S16.Value, S17.Value, S18.Value, S19.Value, S20.Value, S21.Value, S22.Value, S23.Value, S24.Value, S25.Value}
  407. DataStore:SetAsync(key, ToSave)
  408. end
  409. end)
  410.  
  411. game.Players.PlayerRemoving:connect(function(player)
  412. local key = "player-business"..player.userId .."-mtsm"
  413. local Saving = {player.BusinessStats.Employed.Value, player.BusinessStats.HasBusiness.Value, player.BusinessStats.PlayerBusinessStats.CName.Value, player.BusinessStats.PlayerBusinessStats.Icon.Value, player.BusinessStats.PlayerBusinessStats.CEO.Value, player.BusinessStats.Employee.CName.Value, player.BusinessStats.Employee.Icon.Value, player.BusinessStats.Employee.Role.Value, player.BusinessStats.Employee.CEO.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E1.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E2.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E3.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E4.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E5.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E6.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E7.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E8.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E9.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E10.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E11.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E12.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E13.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E14.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E15.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E16.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E17.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E18.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E19.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E20.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E21.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E22.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E23.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E24.Value, player.BusinessStats.PlayerBusinessStats.Members.Employee.E25.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S1.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S2.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S3.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S4.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S5.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S6.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S7.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S8.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S9.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S10.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S11.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S12.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S13.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S14.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S15.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S16.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S17.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S18.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S19.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S20.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S21.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S22.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S23.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S24.Value, player.BusinessStats.PlayerBusinessStats.Members.Secretary.S25.Value}
  414. DataStore:SetAsync(key, Saving)
  415. end)
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!