Advertisement
Dusk-The-Dutchie

(CC) VaultLogger

Jan 24th, 2021
1,116
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --Simple Currency Logger
  2. --For In-Game Value
  3. --(c) 2021 by Christopher Yarch
  4. --a.k.a. Dusk the Dragon
  5.  
  6. --Load Wealth Information
  7. if fs.exists("wealth.dat") then
  8.     f = fs.open("wealth.dat","r")
  9.     d = f.readAll()
  10.     f.close()
  11.     wealth = textutils.unserialise(d)
  12. else
  13.     wealth = {0,0,0,0,0,0,0,0,0,0,0}
  14. end
  15.  
  16. function drawMenu()
  17.     term.clear()
  18.     term.setCursorPos(1,1)
  19.     print("Dusk's Wealth Logger")
  20.     print(" ")
  21.     print("Current Wealth: $"..wealth[11])
  22.     print(" ")
  23.     print("1: Log Income")
  24.     print("2: Log Expense")
  25.     print("3: Export Wealth Data")
  26.     print(" ")
  27.     write("> ")
  28. end
  29.  
  30. function saveWealthData()
  31.     wealth[11] = ((100*wealth[1]) + (50*wealth[2]) + (20*wealth[3]) + (10*wealth[4]) + (5*wealth[5]) + (wealth[6]) + (0.25*wealth[7]) + (0.1*wealth[8]) + (0.05*wealth[9]) + (0.01*wealth[10]))
  32.     f = fs.open("wealth.dat","w")
  33.     f.write(textutils.serialise(wealth))
  34.     f.close()
  35. end
  36.  
  37. while true do
  38.     drawMenu()
  39.     choice = read()
  40.     if choice == "1" then
  41.         term.clear()
  42.         term.setCursorPos(1,1)
  43.         write("$100s: ")
  44.         wealth[1] = wealth[1] + tonumber(read())
  45.         term.setCursorPos(1,2)
  46.         write("$50s: ")
  47.         wealth[2] = wealth[2] + tonumber(read())
  48.         term.setCursorPos(1,3)
  49.         write("$20: ")
  50.         wealth[3] = wealth[3] + tonumber(read())
  51.         term.setCursorPos(1,4)
  52.         write("$10s: ")
  53.         wealth[4] = wealth[4] + tonumber(read())
  54.         term.setCursorPos(1,5)
  55.         write("$5s: ")
  56.         wealth[5] = wealth[5] + tonumber(read())
  57.         term.setCursorPos(1,6)
  58.         write("$1s: ")
  59.         wealth[6] = wealth[6] + tonumber(read())
  60.         term.setCursorPos(1,7)
  61.         write("$0.25s: ")
  62.         wealth[7] = wealth[7] + tonumber(read())
  63.         term.setCursorPos(1,8)
  64.         write("$0.10s: ")
  65.         wealth[8] = wealth[8] + tonumber(read())
  66.         term.setCursorPos(1,9)
  67.         write("$0.05s: ")
  68.         wealth[9] = wealth[9] + tonumber(read())
  69.         term.setCursorPos(1,10)
  70.         write("$0.01s: ")
  71.         wealth[10] = wealth[10] + tonumber(read())
  72.         saveWealthData()
  73.     elseif choice == "2" then
  74.         term.clear()
  75.         term.setCursorPos(1,1)
  76.         write("$100s: ")
  77.         wealth[1] = wealth[1] - tonumber(read())
  78.         term.setCursorPos(1,2)
  79.         write("$50s: ")
  80.         wealth[2] = wealth[2] - tonumber(read())
  81.         term.setCursorPos(1,3)
  82.         write("$20: ")
  83.         wealth[3] = wealth[3] - tonumber(read())
  84.         term.setCursorPos(1,4)
  85.         write("$10s: ")
  86.         wealth[4] = wealth[4] - tonumber(read())
  87.         term.setCursorPos(1,5)
  88.         write("$5s: ")
  89.         wealth[5] = wealth[5] - tonumber(read())
  90.         term.setCursorPos(1,6)
  91.         write("$1s: ")
  92.         wealth[6] = wealth[6] - tonumber(read())
  93.         term.setCursorPos(1,7)
  94.         write("$0.25s: ")
  95.         wealth[7] = wealth[7] - tonumber(read())
  96.         term.setCursorPos(1,8)
  97.         write("$0.10s: ")
  98.         wealth[8] = wealth[8] - tonumber(read())
  99.         term.setCursorPos(1,9)
  100.         write("$0.05s: ")
  101.         wealth[9] = wealth[9] - tonumber(read())
  102.         term.setCursorPos(1,10)
  103.         write("$0.01s: ")
  104.         wealth[10] = wealth[10] - tonumber(read())
  105.         saveWealthData()
  106.     end
  107. end        
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement