main.lua

require "table"
require "string"
ver="0.6.4"
t = {}
os.execute("cls")

local clock = os.clock
function sleep(n)  -- seconds
  local t0 = clock()
  while clock() - t0 <= n do end
end




function value()
pointers=0
files=0
humans=0
macros=0
bots=0
rnds=100
a=10
b=1000
c=100000
d=10000000
e=1000000000
f=110
g=10
clicks=0
cheat=2147483647
name=""
end

function load_file()
dofile( "table.save-1.0.lua" )
local t1 = table.load( "save.dat" )
clicks=t1[1]
pointers=t1[2]
files=t1[3]
humans=t1[4]
macros=t1[5]
bots=t1[6]
rnds=t1[7]
a=t1[8]
b=t1[9]
c=t1[10]
d=t1[11]
e=t1[12]
f=t1[13]
end



function save_game()
dofile( "table.save-1.0.lua" )
table.insert(t, 1, clicks)
table.insert(t, 2, pointers)
table.insert(t, 3, files)
table.insert(t, 4, humans)
table.insert(t, 5, macros)
table.insert(t, 6, bots)
table.insert(t, 7, rnds)
table.insert(t, 8, a)
table.insert(t, 9, b)
table.insert(t, 10, c)
table.insert(t, 11, d)
table.insert(t, 12, e)
table.insert(t, 13, f)
assert( table.save( t, "save.dat" ) == 1 )
end

function credits()
os.execute("lua credits.lua")
main()
end

function rand()
os.execute("sounder click.wav")
clicks=clicks-rnds
rnds=rnds+100
rnd=math.random(1,10000)
if rnd == 100 then
humans=humans+1
elseif rnd == 1000 then
macros=macros+1
elseif rnd == 10000 then
bots=bots+1
else
print("unlucky")
sleep(0.5)
end
end


function name_set()
if name=="HAXOR" then
print("ERROR YOU CAN'T CHANGE YOUR NAME")
main()
end
os.execute("cls")
print("do you want to change your name yes/no")
reed=io.read()
if reed=="yes" then
print("enter a new name")
name=io.read()
main()
elseif reed == "no" then
main()
elseif reed == "" then
print("error no option entered")
sleep(0.5)
name_set()
end
end

function pointer_s()
if clicks >= a then
os.execute("sounder click.wav")
pointers=pointers+1
clicks=clicks-a
a=a+7
click()
else
print("Not enough clicks")
end
end

function batch_s()
if clicks >= b then
os.execute("sounder click.wav")
files=files+1
clicks=clicks-b
b=b+700
click()
else
print("Not enough clicks")
end
end

function human_s()
if clicks >= c then
os.execute("sounder click.wav")
humans=humans+1
clicks=clicks-c
c=c+70000
click()
else
print("Not enough clicks")
end
end

function macro_s()
if clicks >= d then
os.execute("sounder click.wav")
macros=macros+1
clicks=clicks-d
d=d+7000000
click()
else
print("Not enough clicks")
end
end

function bot_s()
if clicks >= e then
os.execute("sounder click.wav")
bots=bots+1
clicks=clicks-e
e=e+700000000
click()
else
print("Not enough clicks")
end
end


function help()
os.execute("cls")
print("     ? = this menu")
print(" point = buy a pointer")
print(" bfile = buy a batch file")
print(" human = buy a human")
print(" macro = buy a macro")
print(" btnet = buy a bot net")
print(" rando = buy a random chance")
print("  name = change name")
print("credit = show credits")
print("  save = save game")
print("  load = load game")
print("  quit = quit/save game")
print("")
print("press enter to continue")
yn=io.read()
if yn == "" then
main()
else
help()
end
end



function welcome()
sleep(0.5)
print("what is your name")
sleep(0.5)
name = io.read()
if name =="HAXOR" then
print("YOU CANT HAVE THAT NAME")
welcome()
end
sleep(0.5)
if name == "CH34T" then
print("YOU HAXOR")
name="HAXOR"
sleep(0.5)
clicks=cheat
pointers=cheat
files=cheat
humans=cheat
macros=cheat
bots=cheat
end
if name=="jason" or name == "Jason" then
os.execute("color c")
end
if name=="zophie" or name == "Zophie" then
os.execute("color c")
end
if name=="misfit" or name=="Misfit" then
os.execute("color e")
end
if name=="fobs" or name=="Fobs" then
os.execute("color 0")
end
if name=="sierra" or naem=="Sierra" then
os.execute("color d")
end
if name=="sam" or "Sam" then
os.execute("color 1")
print("hello "..name.." and welcome to batch clicker (lua) ver: "..ver)
sleep(2)
print("to see a list of commands type ?")
sleep(5)
end
end

function click()
os.execute("cls")
print("Current clicks: "..clicks.."         Player: "..name)
print("Current pointers: "..pointers.."       Current pointer price: "..a)
print("Current batch files: "..files.."    Current batch file price: "..b)
print("Current humans: "..humans.."         Current human price: "..c)
print("Current macros: "..macros.."         Current current macro price: "..d)
print("Current bot nets: "..bots.."       current current bot net price: "..e)
print("Random = "..rnds.." clicks")
clicks=(clicks+1)+(pointers*2)+(files*4)+(humans*8)+(macros*16)+(bots*32)
main()
end

function quit()
save_game()
os.exit()
end

function main()
while true do
check=io.read()

if check == "?" then
help()
end

if check == "" then
click()
end

if check == "-" then
click()
end

if check == "point" then
pointer_s()
end

if check == "bfile" then
batch_s()
end

if check == "human" then
human_s()
end

if check == "macro" then
macro_s()
end

if check == "btnet" then
bot_s()
end

if check == "c_h_e_a_t" and name == "HAXOR" then
clicks=clicks+(cheat*1000000)
pointers=pointers+(cheat*1000000)
files=files+(cheat*1000000)
humans=humans+(cheat*1000000)
macros=macros+(cheat*1000000)
bots=bots+(cheat*1000000)
click()
end

if check == "name" then
name_set()
end

if check == "rando" and clicks >= rnds then
rand()
end

if check == "credit" then
credits()
end

if check == "save" then
save_game()
end

if check == "load" then
load_file()
end

if check == "quit" then
quit()
end

end
end
value()
welcome()
os.execute("cls")
print("Current clicks: "..clicks.."         Player: "..name)
print("Current pointers: "..pointers.."       Current pointer price: "..a)
print("Current batch files: "..files.."    Current batch file price: "..b)
print("Current humans: "..humans.."         Current human price: "..c)
print("Current macros: "..macros.."         Current current macro price: "..d)
print("Current bot nets: "..bots.."       Current current bot net price: "..e)
print("Random = "..rnds.." clicks")
main()