Advertisement
Guest User

blackjack

a guest
Nov 24th, 2014
143
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.38 KB | None | 0 0
  1. Sensor=peripheral.wrap("top")
  2. Screen=peripheral.wrap("right")
  3. Modem=peripheral.wrap("back")
  4. Disk=peripheral.wrap("left")
  5. SizeX,SizeY=Screen:getSize()
  6. FileName="playermetadata"
  7.  
  8. Screen:clear()
  9. function Screen:WriteCenter(Text,Line)
  10.   Screen.setCursorPos((SizeX-string.len(Text))/2+1,Line)
  11.   Screen.write(Text)
  12. end
  13.  
  14. function Screen:WritePos(Text,X,Y)
  15.   Screen.setCursorPos(X,Y)
  16.   Screen.write(Text)
  17. end
  18.  
  19. function readFile(File)
  20.   local File=io.open(File)
  21.   local Dat=File:read("*a")
  22.   File:close()
  23.   return Dat
  24. end
  25.  
  26. function writeFile(File,dat)
  27.   local File=io.open(File,"w")
  28.   File:write(dat)
  29.   File:close()
  30.   return true
  31. end
  32.  
  33. Disk.setDiskLabel("Casino Data")
  34. Mount=Disk:getMountPath()
  35. print("Casino Disk: ",Disk)
  36. FilePath=Mount.."/"..FileName
  37. print("Mount path: ",FilePath)
  38.  
  39. print("Fetching player metadata...")
  40. MetaData=readFile(FilePath)
  41.  
  42. -- divide into key:value pairs
  43.  
  44. local Data,Data_Cnt={},0
  45. for i,v in string.gmatch(MetaData, "(%w+)=(%w+)") do
  46.   Data[i]=tonumber(v)
  47.   Data_Cnt=Data_Cnt+1
  48.   print("Key: ",i,", Value: ",v)
  49. end
  50.  
  51. writeFile(FilePath,"Test=47 Test2=48")
  52. Disk.setDiskLabel("Casino Metadata (Entries: "..Data_Cnt..")")
  53.  
  54. Screen:clear()
  55. Screen:WriteCenter("Player Data",1)
  56.  
  57. local line=4
  58. for i,v in pairs(Data) do
  59.   Screen:WriteCenter(i..": "..v,line)
  60.   line=line+1
  61. end
  62.  
  63. Modem.open(7417)
  64. Modem.transmit(7417,7417,"METADATA_LOADED")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement