Choice Clicker

*title Choice Clicker
*author Eleckar

*scene_list
    startup

*create Choices 0
*create TotalChoices 0
*create ClickSpeed 1
*create potentialclick 0
*create Message ""
*create Clickercost 50
*create ClickCount 0
*create Store false
*create Upgrades false
*create FirstStore false
*create Quote 0

	Main



*gosub Message
*gosub StoreCheck

${Message}
You currently have ${Choices} choices.

*if( (store = false))
    *finish
*else
    	Just keep making choices! Do it!
    	*goto Click

    *if( (Store))
        *finish
    *else
        	There are new upgrades available.

        	#Click!
        		*gosub ChoiceIncrease
        		*goto Up
        	*if ((Store) or (FirstStore)) #To the store!
        		*goto Store




        *set FirstStore true

        "Hello, sir," a stoutly man laboriously says.

        "What can I interest you in today? I see you are carrying ${Choices} choices."

        	*selectable_if (Choices >= ClickerCost) #Faster clicking -- ${ClickerCost} choices
        		*set ClickSpeed +1
        		*set Choices - ClickerCost
        		*set Clickercost round(1.5 * Clickercost)
        		*goto Store2
        	#Nevermind.
        		*goto Up


        *set Choices (Choices + ClickSpeed)
        *set ClickCount + 1
        *return

        *if( (Choices >= ClickerCost))
            *finish
        *else
            	*gosub StoreCheck2
            	*return

            	*set store false
            	*return


            *set store true
            *return

            *if( (ClickCount <= 10))
                *finish
            *else
                	You wake up, dedicated to make productive choices today.

                	*return

                *if( (ClickCount <= 13))
                    *finish
                *else
                    	Your first batch of choices end up being counter-productive.

                    	You take a swig to forget and start a new day.
                    	*set Choices 0

                    	*return

                    *if( (ClickCount >= 100))
                        *finish
                    *else
                        	*rand Message 0 5


                        *return
                        *finish