Module Main
Use Another

Public Class Main Function BoolTest
	Set A To True
	Set B To False
	Set C To B Invert
	Set D To A And C
	Return B
EndFunction

Public Class Main Function NoneTest
	Set A To None
	Return A
EndFunction

Public Class Main Function LoopThirds Args Num
	If Num Equals 0
	Then Return True
	Set TenThirds To 1 Divide 30
	Set Third To TenThirds Multiply 10
	Set NewNum To Num Subtract Third
	Jump Self LoopThirds NewNum
EndFunction

Public Class Main Function RatioTest
	Jump Self LoopThirds 10
EndFunction

Public Class Main Function IfTest
	If False
	Then Return False

	If False
	Then Return False
	ElseIf True
	Then Return True
	Else Return False
EndFunction

Public Class Main Function CountDown Args NumFrom
	If NumFrom Equals 0
	Then Return True
	Set Next To NumFrom Subtract 1
	Jump Self CountDown Next
EndFunction

Public Class Main Function LoopTest
	Jump Self CountDown 10000
EndFunction

Class MakeNumberClass
EndClass

Public Class MakeNumberClass Function DoIt
	Set Halfish To Another GetHalfish 620
	Set Double To Halfish Add Halfish
	Set Final To Double Subtract 2
	Return Final
EndFunction

Public Class Main Function MakeNumber
	Set Maker To Create MakeNumberClass
	Jump Maker DoIt
EndFunction