Shitty Clicker Beta 1

sc = [showgui sauerclicker]

newgui sauerclicker [
	guistayopen [
	guilist [
		guititle "^f6Money"
		guibar
		guititle (money)
		]
	guilist [
		guititle "^f6Money Per Second"
		guibar
		guititle (moneypersecond)
		]
	guibar
	guibutton "more money" genmoney
	guibar
	guibutton "upgrades" [showgui sc-upgrades]
	]
]

newgui sc-upgrades [
	guistayopen [
	guititle "^f6Shit"
		guilist [
			guibutton "Shitty Upgrade" [shittymoneycheck;]
			guibar
			guititle "^f6Cost: 100"
			guibar
			guititle "^f6MPS + 1"
			guibar
			guititle "^f6Owned:"
			guibar
			guititle (shittyupgradeowned)
		]
	]
]

shittycost = 100

shittymoneycheck = [shittymoneycheck1; shittymoneycheck2;]
shittymoneycheck1 = [if (< $money $shittycost) [echo "^f7Aint got nuff money"]]
shittymoneycheck2 = [if (> $money $shittycost) [money = (- $money 100); moneypersecond = (+ $moneypersecond 1);  shittyupgradeowned = (+ $shittyupgradeowned 1)]]

genmoney = [money = (+ $money 1)]
mps = [sleep 1000 [money = (+ $money $moneypersecond); mps;]];
mps