-----------------------------------------------------------
--		Source.
-----------------------------------------------------------

-- This file is for stress-testing the pretty printer.

-- test natural logarithms
local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2

-- test keywords
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;

--test tables
temptable =
{
	1,2,3,4,-5,"six",name_1="string_1",{7.1,7.2,7.3,},getlength,function() print("Nine") end,twelve=-12,{},
	-- comment
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})

-- test comments
-- comment
-- comment
-- comment
-- comment

argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       "1 = 1"         ) end

dofiles = function()
print("printing")
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print("equalorequalorequalorequal")
	return
    else
        print("not equal")
	return
	"bladibla"
    end
    do
        print(i .. " eyes")
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())
--print(return_two_values(2))
--clone()

--------------------------------------------------------------------------------
-- Inserts an item into a table. Useful where the 'tinsert' function is normally unavailable.
function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end

-----------------------------------------------------------
--		Removing all carriage returns...
-----------------------------------------------------------

-- This file is for stress-testing the pretty printer.

-- test natural logarithms
local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2

-- test keywords
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;

--test tables
temptable =
{
	1,2,3,4,-5,"six",name_1="string_1",{7.1,7.2,7.3,},getlength,function() print("Nine") end,twelve=-12,{},
	-- comment
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})

-- test comments
-- comment
-- comment
-- comment
-- comment

argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       "1 = 1"         ) end

dofiles = function()
print("printing")
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print("equalorequalorequalorequal")
	return
    else
        print("not equal")
	return
	"bladibla"
    end
    do
        print(i .. " eyes")
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())
--print(return_two_values(2))
--clone()

--------------------------------------------------------------------------------
-- Inserts an item into a table. Useful where the 'tinsert' function is normally unavailable.
function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end

-----------------------------------------------------------
--		Adding a blank line to the end if not already...
-----------------------------------------------------------

-- This file is for stress-testing the pretty printer.

-- test natural logarithms
local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2

-- test keywords
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;

--test tables
temptable =
{
	1,2,3,4,-5,"six",name_1="string_1",{7.1,7.2,7.3,},getlength,function() print("Nine") end,twelve=-12,{},
	-- comment
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})

-- test comments
-- comment
-- comment
-- comment
-- comment

argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       "1 = 1"         ) end

dofiles = function()
print("printing")
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print("equalorequalorequalorequal")
	return
    else
        print("not equal")
	return
	"bladibla"
    end
    do
        print(i .. " eyes")
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())
--print(return_two_values(2))
--clone()

--------------------------------------------------------------------------------
-- Inserts an item into a table. Useful where the 'tinsert' function is normally unavailable.
function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Removing blank lines at the beginning of the file...
-----------------------------------------------------------

-- This file is for stress-testing the pretty printer.

-- test natural logarithms
local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2

-- test keywords
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;

--test tables
temptable =
{
	1,2,3,4,-5,"six",name_1="string_1",{7.1,7.2,7.3,},getlength,function() print("Nine") end,twelve=-12,{},
	-- comment
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})

-- test comments
-- comment
-- comment
-- comment
-- comment

argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       "1 = 1"         ) end

dofiles = function()
print("printing")
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print("equalorequalorequalorequal")
	return
    else
        print("not equal")
	return
	"bladibla"
    end
    do
        print(i .. " eyes")
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())
--print(return_two_values(2))
--clone()

--------------------------------------------------------------------------------
-- Inserts an item into a table. Useful where the 'tinsert' function is normally unavailable.
function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing comments with gibberish...
-----------------------------------------------------------




local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2


thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;


temptable =
{
	1,2,3,4,-5,"six",name_1="string_1",{7.1,7.2,7.3,},getlength,function() print("Nine") end,twelve=-12,{},
	
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})







argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       "1 = 1"         ) end

dofiles = function()
print("printing")
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print("equalorequalorequalorequal")
	return
    else
        print("not equal")
	return
	"bladibla"
    end
    do
        print(i .. " eyes")
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())





function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing escaped quotation marks with gibberish...
-----------------------------------------------------------




local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2


thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;


temptable =
{
	1,2,3,4,-5,"six",name_1="string_1",{7.1,7.2,7.3,},getlength,function() print("Nine") end,twelve=-12,{},
	
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})







argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       "1 = 1"         ) end

dofiles = function()
print("printing")
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print("equalorequalorequalorequal")
	return
    else
        print("not equal")
	return
	"bladibla"
    end
    do
        print(i .. " eyes")
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())





function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing strings with gibberish.
-----------------------------------------------------------




local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2


thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;


temptable =
{
	1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function() print(@s2s@) end,twelve=-12,{},
	
}

temptable[10] = 10
temptable.eleven = @s3s@
temptable[@s4s@] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})







argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       @s5s@         ) end

dofiles = function()
print(@s6s@)
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print(@s7s@)
	return
    else
        print(@s8s@)
	return
	@s9s@
    end
    do
        print(i .. @s10s@)
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())





function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
{
}
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing empty tables with gibberish...
-----------------------------------------------------------




local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2


thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;


temptable =
{
	1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function() print(@s2s@) end,twelve=-12,@tet@,
	
}

temptable[10] = 10
temptable.eleven = @s3s@
temptable[@s4s@] = 12
temptable[ 4 ] = 4
dothisfunction({1,1,1,})







argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print(       @s5s@         ) end

dofiles = function()
print(@s6s@)
end

local functionsdostuff__ = function
	()
	do
	end
end

dofiles()
functionsdostuff__	()

function test_loop()
    for i = (1), (9), (2) do
        print(i^ - 2)
    end
    for i = 1, 9 do
        print(i)
    end
	for i, iCount in argtable do
		print(i)
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print(i)
        i = i + 1
    until i == 5
    local i = 0
    while (i < 7) do
        if (i == 0.0000) and (-400.0 == 200.050) then
            break
        elseif ((2 ==                  2) and (4 == 5)) then
		print(i)
		return
	else
		print(i)
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while (them not they ~= we) then
    end
    if {1,2,3,} == {1,2,3,} then
        print(@s7s@)
	return
    else
        print(@s8s@)
	return
	@s9s@
    end
    do
        print(i .. @s10s@)
	return (2)
    end
end

function return_two_values(arg)
    if (arg == 1) then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function(self)
	print(type(self))
end

print(test_loop())





function
	tinsert
		(
			tTable
				,
					Arg1
						,
							Arg2
								)
								if
							(
						Arg2
					)
				then
			local
		TempTable
	=
@tet@
	for
		i
			=
				Arg1
					,
						getn
							(
								tTable
									)
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										(
											tTable
												)
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	(
tTable
	)
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing function arguments with gibberish...
-----------------------------------------------------------




local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2


thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;


temptable =
{
	1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function@a0a@ print@a1a@ end,twelve=-12,@tet@,
	
}

temptable[10] = 10
temptable.eleven = @s3s@
temptable[@s4s@] = 12
temptable[ 4 ] = 4
dothisfunction@a2a@







argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print@a3a@ end

dofiles = function@a4a@
print@a5a@
end

local functionsdostuff__ = function
	@a6a@
	do
	end
end

dofiles@a7a@
functionsdostuff__	@a8a@

function test_loop@a9a@
    for i = @a10a@, @a11a@, @a12a@ do
        print@a13a@
    end
    for i = 1, 9 do
        print@a14a@
    end
	for i, iCount in argtable do
		print@a15a@
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print@a16a@
        i = i + 1
    until i == 5
    local i = 0
    while @a17a@ do
        if @a18a@ and @a19a@ then
            break
        elseif @a22a@ then
		print@a23a@
		return
	else
		print@a24a@
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while @a25a@ then
    end
    if {1,2,3,} == {1,2,3,} then
        print@a26a@
	return
    else
        print@a27a@
	return
	@s9s@
    end
    do
        print@a28a@
	return @a29a@
    end
end

function return_two_values@a30a@
    if @a31a@ then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function@a32a@
	print@a34a@
end

print@a36a@





function
	tinsert
		@a37a@
								if
							@a38a@
				then
			local
		TempTable
	=
@tet@
	for
		i
			=
				Arg1
					,
						getn
							@a39a@
								do
							TempTable
						[
					i
				+
			1
		]
	=
tTable
[
	i
		]
			end
				for
					i
						=
							Arg1
								,
									getn
										@a40a@
													do
												tTable
											[
										i
									+
								1
							]
						=
					TempTable
				[
			i
		+
	1
]
end
tTable
		[
			Arg1
				]
					=
						Arg2
					else
				tTable
			[
		getn
	@a41a@
		+
			1
				]
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing table indices with gibberish...
-----------------------------------------------------------




local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2


thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil;


temptable =
{
	1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function@a0a@ print@a1a@ end,twelve=-12,@tet@,
	
}

temptable@i0i@ = 10
temptable.eleven = @s3s@
temptable@i1i@ = 12
temptable@i2i@ = 4
dothisfunction@a2a@







argtable =
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then print@a3a@ end

dofiles = function@a4a@
print@a5a@
end

local functionsdostuff__ = function
	@a6a@
	do
	end
end

dofiles@a7a@
functionsdostuff__	@a8a@

function test_loop@a9a@
    for i = @a10a@, @a11a@, @a12a@ do
        print@a13a@
    end
    for i = 1, 9 do
        print@a14a@
    end
	for i, iCount in argtable do
		print@a15a@
	end
    local i = 0
    repeat
        if i == 100 and 0.04000 == 100 then
            return 1
        end
        print@a16a@
        i = i + 1
    until i == 5
    local i = 0
    while @a17a@ do
        if @a18a@ and @a19a@ then
            break
        elseif @a22a@ then
		print@a23a@
		return
	else
		print@a24a@
		i = -1 + .1 + i + 1
        end
    end
    if this and that == those then
        thisandthat = this + that
    end
    while @a25a@ then
    end
    if {1,2,3,} == {1,2,3,} then
        print@a26a@
	return
    else
        print@a27a@
	return
	@s9s@
    end
    do
        print@a28a@
	return @a29a@
    end
end

function return_two_values@a30a@
    if @a31a@ then
        return 1, 2
    else
        return
        {1, 2,}
    end
end

clone = function@a32a@
	print@a34a@
end

print@a36a@





function
	tinsert
		@a37a@
								if
							@a38a@
				then
			local
		TempTable
	=
@tet@
	for
		i
			=
				Arg1
					,
						getn
							@a39a@
								do
							TempTable
						@i3i@
	=
tTable
@i4i@
			end
				for
					i
						=
							Arg1
								,
									getn
										@a40a@
													do
												tTable
											@i5i@
						=
					TempTable
				@i6i@
end
tTable
		@i7i@
					=
						Arg2
					else
				tTable
			@i8i@
					=
						Arg1
							end
						end


-----------------------------------------------------------
--		Replacing whitespace with single spaces...
-----------------------------------------------------------

 local test_var1 = endingine + 10
local test_var2 = -100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil;
varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable =
{ 1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function@a0a@ print@a1a@ end,twelve=-12,@tet@, } temptable@i0i@ = 10
temptable.eleven = @s3s@
temptable@i1i@ = 12
temptable@i2i@ = 4
dothisfunction@a2a@ argtable =
{ temptable, alpha, beta,
} if 1 == 1 then print@a3a@ end dofiles = function@a4a@
print@a5a@
end local functionsdostuff__ = function @a6a@ do end
end dofiles@a7a@
functionsdostuff__	@a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if {1,2,3,} == {1,2,3,} then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end
end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return {1, 2,} end
end clone = function@a32a@ print@a34a@
end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable =
@tet@ for i = Arg1 , getn @a39a@ do TempTable @i3i@ =
tTable
@i4i@ end for i = Arg1 , getn @a40a@ do tTable @i5i@ = TempTable @i6i@
end
tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end


-----------------------------------------------------------
--		Replacing whitespace with single spaces...
-----------------------------------------------------------

 local test_var1 = endingine + 10 local test_var2 = -100e+20 local test_var3 = 5.0E-10 local test_var4 = e + 5 local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2 functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil; varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable = { 1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function@a0a@ print@a1a@ end,twelve=-12,@tet@, } temptable@i0i@ = 10 temptable.eleven = @s3s@ temptable@i1i@ = 12 temptable@i2i@ = 4 dothisfunction@a2a@ argtable = { temptable, alpha, beta, } if 1 == 1 then print@a3a@ end dofiles = function@a4a@ print@a5a@ end local functionsdostuff__ = function @a6a@ do end end dofiles@a7a@ functionsdostuff__ @a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if {1,2,3,} == {1,2,3,} then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return {1, 2,} end end clone = function@a32a@ print@a34a@ end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable = @tet@ for i = Arg1 , getn @a39a@ do TempTable @i3i@ = tTable @i4i@ end for i = Arg1 , getn @a40a@ do tTable @i5i@ = TempTable @i6i@ end tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end 

-----------------------------------------------------------
--		Removing spaces before commas...
-----------------------------------------------------------

 local test_var1 = endingine + 10 local test_var2 = -100e+20 local test_var3 = 5.0E-10 local test_var4 = e + 5 local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2 functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil; varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable = { 1,2,3,4,-5,@s0s@,name_1=@s1s@,{7.1,7.2,7.3,},getlength,function@a0a@ print@a1a@ end,twelve=-12,@tet@, } temptable@i0i@ = 10 temptable.eleven = @s3s@ temptable@i1i@ = 12 temptable@i2i@ = 4 dothisfunction@a2a@ argtable = { temptable, alpha, beta, } if 1 == 1 then print@a3a@ end dofiles = function@a4a@ print@a5a@ end local functionsdostuff__ = function @a6a@ do end end dofiles@a7a@ functionsdostuff__ @a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if {1,2,3,} == {1,2,3,} then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return {1, 2,} end end clone = function@a32a@ print@a34a@ end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable = @tet@ for i = Arg1, getn @a39a@ do TempTable @i3i@ = tTable @i4i@ end for i = Arg1, getn @a40a@ do tTable @i5i@ = TempTable @i6i@ end tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end 

-----------------------------------------------------------
--		Placing spaces after commas...
-----------------------------------------------------------

 local test_var1 = endingine + 10 local test_var2 = -100e+20 local test_var3 = 5.0E-10 local test_var4 = e + 5 local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2 functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil; varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable = { 1, 2, 3, 4, -5, @s0s@, name_1=@s1s@, {7.1, 7.2, 7.3, }, getlength, function@a0a@ print@a1a@ end, twelve=-12, @tet@, } temptable@i0i@ = 10 temptable.eleven = @s3s@ temptable@i1i@ = 12 temptable@i2i@ = 4 dothisfunction@a2a@ argtable = { temptable, alpha, beta, } if 1 == 1 then print@a3a@ end dofiles = function@a4a@ print@a5a@ end local functionsdostuff__ = function @a6a@ do end end dofiles@a7a@ functionsdostuff__ @a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if {1, 2, 3, } == {1, 2, 3, } then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return {1, 2, } end end clone = function@a32a@ print@a34a@ end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable = @tet@ for i = Arg1, getn @a39a@ do TempTable @i3i@ = tTable @i4i@ end for i = Arg1, getn @a40a@ do tTable @i5i@ = TempTable @i6i@ end tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end 

-----------------------------------------------------------
--		Adding a tab to the beginning of the string...
-----------------------------------------------------------

	 local test_var1 = endingine + 10 local test_var2 = -100e+20 local test_var3 = 5.0E-10 local test_var4 = e + 5 local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2 functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil; varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable = { 1, 2, 3, 4, -5, @s0s@, name_1=@s1s@, {7.1, 7.2, 7.3, }, getlength, function@a0a@ print@a1a@ end, twelve=-12, @tet@, } temptable@i0i@ = 10 temptable.eleven = @s3s@ temptable@i1i@ = 12 temptable@i2i@ = 4 dothisfunction@a2a@ argtable = { temptable, alpha, beta, } if 1 == 1 then print@a3a@ end dofiles = function@a4a@ print@a5a@ end local functionsdostuff__ = function @a6a@ do end end dofiles@a7a@ functionsdostuff__ @a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if {1, 2, 3, } == {1, 2, 3, } then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return {1, 2, } end end clone = function@a32a@ print@a34a@ end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable = @tet@ for i = Arg1, getn @a39a@ do TempTable @i3i@ = tTable @i4i@ end for i = Arg1, getn @a40a@ do tTable @i5i@ = TempTable @i6i@ end tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end 

-----------------------------------------------------------
--		Breaking and indenting at every occurance of a left bracket...
-----------------------------------------------------------

	 local test_var1 = endingine + 10 local test_var2 = -100e+20 local test_var3 = 5.0E-10 local test_var4 = e + 5 local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2 functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil; varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable = 
	{
		 1, 2, 3, 4, -5, @s0s@, name_1=@s1s@, 
		{
			7.1, 7.2, 7.3, }, getlength, function@a0a@ print@a1a@ end, twelve=-12, @tet@, } temptable@i0i@ = 10 temptable.eleven = @s3s@ temptable@i1i@ = 12 temptable@i2i@ = 4 dothisfunction@a2a@ argtable = 
			{
				 temptable, alpha, beta, } if 1 == 1 then print@a3a@ end dofiles = function@a4a@ print@a5a@ end local functionsdostuff__ = function @a6a@ do end end dofiles@a7a@ functionsdostuff__ @a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if 
				{
					1, 2, 3, } == 
					{
						1, 2, 3, } then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return 
						{
							1, 2, } end end clone = function@a32a@ print@a34a@ end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable = @tet@ for i = Arg1, getn @a39a@ do TempTable @i3i@ = tTable @i4i@ end for i = Arg1, getn @a40a@ do tTable @i5i@ = TempTable @i6i@ end tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end 

-----------------------------------------------------------
--		Breaking and outdenting at every occurance of a right bracket...
-----------------------------------------------------------

	 local test_var1 = endingine + 10 local test_var2 = -100e+20 local test_var3 = 5.0E-10 local test_var4 = e + 5 local test_var5 = player01e + 2 thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2 functionvar = nil; endvar = nil; ifvar = nil; elseifvar = nil; whilevar = nil; untilvar = nil; andvar = nil; orvar = nil; notvar = nil; repeatvar = nil; returnvar = nil; breakvar = nil; localvar = nil; globalvar = nil; varfunction = nil; varend = nil; varif = nil; varelseif = nil; varwhile = nil; varuntil = nil; varand = nil; varor = nil; varnot = nil; varrepeat = nil; varreturn = nil; varbreak = nil; varlocal = nil; varglobal = nil; temptable = 
	{
		 1, 2, 3, 4, -5, @s0s@, name_1=@s1s@, 
		{
			7.1, 7.2, 7.3, 
		},
		 getlength, function@a0a@ print@a1a@ end, twelve=-12, @tet@, 
	}
	 temptable@i0i@ = 10 temptable.eleven = @s3s@ temptable@i1i@ = 12 temptable@i2i@ = 4 dothisfunction@a2a@ argtable = 
	{
		 temptable, alpha, beta, 
	}
	 if 1 == 1 then print@a3a@ end dofiles = function@a4a@ print@a5a@ end local functionsdostuff__ = function @a6a@ do end end dofiles@a7a@ functionsdostuff__ @a8a@ function test_loop@a9a@ for i = @a10a@, @a11a@, @a12a@ do print@a13a@ end for i = 1, 9 do print@a14a@ end for i, iCount in argtable do print@a15a@ end local i = 0 repeat if i == 100 and 0.04000 == 100 then return 1 end print@a16a@ i = i + 1 until i == 5 local i = 0 while @a17a@ do if @a18a@ and @a19a@ then break elseif @a22a@ then print@a23a@ return else print@a24a@ i = -1 + .1 + i + 1 end end if this and that == those then thisandthat = this + that end while @a25a@ then end if 
	{
		1, 2, 3, 
	}
	 == 
	{
		1, 2, 3, 
	}
	 then print@a26a@ return else print@a27a@ return @s9s@ end do print@a28a@ return @a29a@ end end function return_two_values@a30a@ if @a31a@ then return 1, 2 else return 
	{
		1, 2, 
	}
	 end end clone = function@a32a@ print@a34a@ end print@a36a@ function tinsert @a37a@ if @a38a@ then local TempTable = @tet@ for i = Arg1, getn @a39a@ do TempTable @i3i@ = tTable @i4i@ end for i = Arg1, getn @a40a@ do tTable @i5i@ = TempTable @i6i@ end tTable @i7i@ = Arg2 else tTable @i8i@ = Arg1 end end 

-----------------------------------------------------------
--		Replacing single spaces with new-lines...
-----------------------------------------------------------

	
	local
	test_var1
	=
	endingine
	+
	10
	local
	test_var2
	=
	-100e+20
	local
	test_var3
	=
	5.0E-10
	local
	test_var4
	=
	e
	+
	5
	local
	test_var5
	=
	player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat
	=
	2
	functionvar
	=
	nil;
	endvar
	=
	nil;
	ifvar
	=
	nil;
	elseifvar
	=
	nil;
	whilevar
	=
	nil;
	untilvar
	=
	nil;
	andvar
	=
	nil;
	orvar
	=
	nil;
	notvar
	=
	nil;
	repeatvar
	=
	nil;
	returnvar
	=
	nil;
	breakvar
	=
	nil;
	localvar
	=
	nil;
	globalvar
	=
	nil;
	varfunction
	=
	nil;
	varend
	=
	nil;
	varif
	=
	nil;
	varelseif
	=
	nil;
	varwhile
	=
	nil;
	varuntil
	=
	nil;
	varand
	=
	nil;
	varor
	=
	nil;
	varnot
	=
	nil;
	varrepeat
	=
	nil;
	varreturn
	=
	nil;
	varbreak
	=
	nil;
	varlocal
	=
	nil;
	varglobal
	=
	nil;
	temptable
	=
	
	{
		
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		
		{
			7.1,
			7.2,
			7.3,
			
		},
		
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
		
	}
	
	temptable@i0i@
	=
	10
	temptable.eleven
	=
	@s3s@
	temptable@i1i@
	=
	12
	temptable@i2i@
	=
	4
	dothisfunction@a2a@
	argtable
	=
	
	{
		
		temptable,
		alpha,
		beta,
		
	}
	
	if
	1
	==
	1
	then
	print@a3a@
	end
	dofiles
	=
	function@a4a@
	print@a5a@
	end
	local
	functionsdostuff__
	=
	function
	@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__
	@a8a@
	function
	test_loop@a9a@
	for
	i
	=
	@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for
	i
	=
	1,
	9
	do
	print@a14a@
	end
	for
	i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local
	i
	=
	0
	repeat
	if
	i
	==
	100
	and
	0.04000
	==
	100
	then
	return
	1
	end
	print@a16a@
	i
	=
	i
	+
	1
	until
	i
	==
	5
	local
	i
	=
	0
	while
	@a17a@
	do
	if
	@a18a@
	and
	@a19a@
	then
	break
	elseif
	@a22a@
	then
	print@a23a@
	return
	else
	print@a24a@
	i
	=
	-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if
	this
	and
	that
	==
	those
	then
	thisandthat
	=
	this
	+
	that
	end
	while
	@a25a@
	then
	end
	if
	
	{
		1,
		2,
		3,
		
	}
	
	==
	
	{
		1,
		2,
		3,
		
	}
	
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return
	@a29a@
	end
	end
	function
	return_two_values@a30a@
	if
	@a31a@
	then
	return
	1,
	2
	else
	return
	
	{
		1,
		2,
		
	}
	
	end
	end
	clone
	=
	function@a32a@
	print@a34a@
	end
	print@a36a@
	function
	tinsert
	@a37a@
	if
	@a38a@
	then
	local
	TempTable
	=
	@tet@
	for
	i
	=
	Arg1,
	getn
	@a39a@
	do
	TempTable
	@i3i@
	=
	tTable
	@i4i@
	end
	for
	i
	=
	Arg1,
	getn
	@a40a@
	do
	tTable
	@i5i@
	=
	TempTable
	@i6i@
	end
	tTable
	@i7i@
	=
	Arg2
	else
	tTable
	@i8i@
	=
	Arg1
	end
	end
	

-----------------------------------------------------------
--		Removing blank lines...
-----------------------------------------------------------


	local
	test_var1
	=
	endingine
	+
	10
	local
	test_var2
	=
	-100e+20
	local
	test_var3
	=
	5.0E-10
	local
	test_var4
	=
	e
	+
	5
	local
	test_var5
	=
	player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat
	=
	2
	functionvar
	=
	nil;
	endvar
	=
	nil;
	ifvar
	=
	nil;
	elseifvar
	=
	nil;
	whilevar
	=
	nil;
	untilvar
	=
	nil;
	andvar
	=
	nil;
	orvar
	=
	nil;
	notvar
	=
	nil;
	repeatvar
	=
	nil;
	returnvar
	=
	nil;
	breakvar
	=
	nil;
	localvar
	=
	nil;
	globalvar
	=
	nil;
	varfunction
	=
	nil;
	varend
	=
	nil;
	varif
	=
	nil;
	varelseif
	=
	nil;
	varwhile
	=
	nil;
	varuntil
	=
	nil;
	varand
	=
	nil;
	varor
	=
	nil;
	varnot
	=
	nil;
	varrepeat
	=
	nil;
	varreturn
	=
	nil;
	varbreak
	=
	nil;
	varlocal
	=
	nil;
	varglobal
	=
	nil;
	temptable
	=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@
	=
	10
	temptable.eleven
	=
	@s3s@
	temptable@i1i@
	=
	12
	temptable@i2i@
	=
	4
	dothisfunction@a2a@
	argtable
	=
	{
		temptable,
		alpha,
		beta,
	}
	if
	1
	==
	1
	then
	print@a3a@
	end
	dofiles
	=
	function@a4a@
	print@a5a@
	end
	local
	functionsdostuff__
	=
	function
	@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__
	@a8a@
	function
	test_loop@a9a@
	for
	i
	=
	@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for
	i
	=
	1,
	9
	do
	print@a14a@
	end
	for
	i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local
	i
	=
	0
	repeat
	if
	i
	==
	100
	and
	0.04000
	==
	100
	then
	return
	1
	end
	print@a16a@
	i
	=
	i
	+
	1
	until
	i
	==
	5
	local
	i
	=
	0
	while
	@a17a@
	do
	if
	@a18a@
	and
	@a19a@
	then
	break
	elseif
	@a22a@
	then
	print@a23a@
	return
	else
	print@a24a@
	i
	=
	-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if
	this
	and
	that
	==
	those
	then
	thisandthat
	=
	this
	+
	that
	end
	while
	@a25a@
	then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return
	@a29a@
	end
	end
	function
	return_two_values@a30a@
	if
	@a31a@
	then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone
	=
	function@a32a@
	print@a34a@
	end
	print@a36a@
	function
	tinsert
	@a37a@
	if
	@a38a@
	then
	local
	TempTable
	=
	@tet@
	for
	i
	=
	Arg1,
	getn
	@a39a@
	do
	TempTable
	@i3i@
	=
	tTable
	@i4i@
	end
	for
	i
	=
	Arg1,
	getn
	@a40a@
	do
	tTable
	@i5i@
	=
	TempTable
	@i6i@
	end
	tTable
	@i7i@
	=
	Arg2
	else
	tTable
	@i8i@
	=
	Arg1
	end
	end


-----------------------------------------------------------
--		Putting key/variable pairs on the same line...
-----------------------------------------------------------


	local
	test_var1=endingine
	+
	10
	local
	test_var2=-100e+20
	local
	test_var3=5.0E-10
	local
	test_var4=e
	+
	5
	local
	test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if
	1==1
	then
	print@a3a@
	end
	dofiles=function@a4a@
	print@a5a@
	end
	local
	functionsdostuff__=function
	@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__
	@a8a@
	function
	test_loop@a9a@
	for
	i=@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for
	i=1,
	9
	do
	print@a14a@
	end
	for
	i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local
	i=0
	repeat
	if
	i==100
	and
	0.04000==100
	then
	return
	1
	end
	print@a16a@
	i=i
	+
	1
	until
	i==5
	local
	i=0
	while
	@a17a@
	do
	if
	@a18a@
	and
	@a19a@
	then
	break
	elseif
	@a22a@
	then
	print@a23a@
	return
	else
	print@a24a@
	i=-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if
	this
	and
	that==those
	then
	thisandthat=this
	+
	that
	end
	while
	@a25a@
	then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return
	@a29a@
	end
	end
	function
	return_two_values@a30a@
	if
	@a31a@
	then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone=function@a32a@
	print@a34a@
	end
	print@a36a@
	function
	tinsert
	@a37a@
	if
	@a38a@
	then
	local
	TempTable=@tet@
	for
	i=Arg1,
	getn
	@a39a@
	do
	TempTable
	@i3i@=tTable
	@i4i@
	end
	for
	i=Arg1,
	getn
	@a40a@
	do
	tTable
	@i5i@=TempTable
	@i6i@
	end
	tTable
	@i7i@=Arg2
	else
	tTable
	@i8i@=Arg1
	end
	end


-----------------------------------------------------------
--		Putting keywords on the same line...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then
	print@a3a@
	end
	dofiles=function@a4a@
	print@a5a@
	end
	local functionsdostuff__=function
	@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__
	@a8a@
	function test_loop@a9a@
	for i=@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for i=1,
	9
	do
	print@a14a@
	end
	for i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local i=0
	repeat
	if i==100 and 0.04000==100 then
	return
	1
	end
	print@a16a@
	i=i
	+
	1
	until i==5
	local i=0
	while @a17a@
	do
	if @a18a@ and @a19a@ then
	break
	elseif @a22a@ then
	print@a23a@
	return
	else
	print@a24a@
	i=-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if this and that==those then
	thisandthat=this
	+
	that
	end
	while @a25a@ then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return
	@a29a@
	end
	end
	function return_two_values@a30a@
	if @a31a@ then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone=function@a32a@
	print@a34a@
	end
	print@a36a@
	function tinsert
	@a37a@
	if @a38a@ then
	local TempTable=@tet@
	for i=Arg1,
	getn
	@a39a@
	do
	TempTable
	@i3i@=tTable
	@i4i@
	end
	for i=Arg1,
	getn
	@a40a@
	do
	tTable
	@i5i@=TempTable
	@i6i@
	end
	tTable
	@i7i@=Arg2
	else
	tTable
	@i8i@=Arg1
	end
	end


-----------------------------------------------------------
--		Removing whitespace between names and arguments...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then
	print@a3a@
	end
	dofiles=function@a4a@
	print@a5a@
	end
	local functionsdostuff__=function@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@
	for i=@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for i=1,
	9
	do
	print@a14a@
	end
	for i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local i=0
	repeat
	if i==100 and 0.04000==100 then
	return
	1
	end
	print@a16a@
	i=i
	+
	1
	until i==5
	local i=0
	while@a17a@
	do
	if@a18a@ and@a19a@ then
	break
	elseif@a22a@ then
	print@a23a@
	return
	else
	print@a24a@
	i=-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if this and that==those then
	thisandthat=this
	+
	that
	end
	while@a25a@ then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return@a29a@
	end
	end
	function return_two_values@a30a@
	if@a31a@ then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone=function@a32a@
	print@a34a@
	end
	print@a36a@
	function tinsert@a37a@
	if@a38a@ then
	local TempTable=@tet@
	for i=Arg1,
	getn@a39a@
	do
	TempTable
	@i3i@=tTable
	@i4i@
	end
	for i=Arg1,
	getn@a40a@
	do
	tTable
	@i5i@=TempTable
	@i6i@
	end
	tTable
	@i7i@=Arg2
	else
	tTable
	@i8i@=Arg1
	end
	end


-----------------------------------------------------------
--		Re-adding whitespace between "if", "elseif", "while" and "until" and their arguments...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then
	print@a3a@
	end
	dofiles=function@a4a@
	print@a5a@
	end
	local functionsdostuff__=function@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@
	for i=@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for i=1,
	9
	do
	print@a14a@
	end
	for i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local i=0
	repeat
	if i==100 and 0.04000==100 then
	return
	1
	end
	print@a16a@
	i=i
	+
	1
	until i==5
	local i=0
	while @a17a@
	do
	if @a18a@ and@a19a@ then
	break
	elseif @a22a@ then
	print@a23a@
	return
	else
	print@a24a@
	i=-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if this and that==those then
	thisandthat=this
	+
	that
	end
	while @a25a@ then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return@a29a@
	end
	end
	function return_two_values@a30a@
	if @a31a@ then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone=function@a32a@
	print@a34a@
	end
	print@a36a@
	function tinsert@a37a@
	if @a38a@ then
	local TempTable=@tet@
	for i=Arg1,
	getn@a39a@
	do
	TempTable
	@i3i@=tTable
	@i4i@
	end
	for i=Arg1,
	getn@a40a@
	do
	tTable
	@i5i@=TempTable
	@i6i@
	end
	tTable
	@i7i@=Arg2
	else
	tTable
	@i8i@=Arg1
	end
	end


-----------------------------------------------------------
--		Re-adding whitespace between return and returned statements...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then
	print@a3a@
	end
	dofiles=function@a4a@
	print@a5a@
	end
	local functionsdostuff__=function@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@
	for i=@a10a@,
	@a11a@,
	@a12a@
	do
	print@a13a@
	end
	for i=1,
	9
	do
	print@a14a@
	end
	for i,
	iCount
	in
	argtable
	do
	print@a15a@
	end
	local i=0
	repeat
	if i==100 and 0.04000==100 then
	return
	1
	end
	print@a16a@
	i=i
	+
	1
	until i==5
	local i=0
	while @a17a@
	do
	if @a18a@ and@a19a@ then
	break
	elseif @a22a@ then
	print@a23a@
	return
	else
	print@a24a@
	i=-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if this and that==those then
	thisandthat=this
	+
	that
	end
	while @a25a@ then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return
	@a29a@
	end
	end
	function return_two_values@a30a@
	if @a31a@ then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone=function@a32a@
	print@a34a@
	end
	print@a36a@
	function tinsert@a37a@
	if @a38a@ then
	local TempTable=@tet@
	for i=Arg1,
	getn@a39a@
	do
	TempTable
	@i3i@=tTable
	@i4i@
	end
	for i=Arg1,
	getn@a40a@
	do
	tTable
	@i5i@=TempTable
	@i6i@
	end
	tTable
	@i7i@=Arg2
	else
	tTable
	@i8i@=Arg1
	end
	end


-----------------------------------------------------------
--		Putting "for" and "while" statements all on one line...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@
		print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then
	print@a3a@
	end
	dofiles=function@a4a@
	print@a5a@
	end
	local functionsdostuff__=function@a6a@
	do
	end
	end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@
	for i=@a10a@, @a11a@, @a12a@ do
	print@a13a@
	end
	for i=1, 9 do
	print@a14a@
	end
	for i, iCount in argtable do
	print@a15a@
	end
	local i=0
	repeat
	if i==100 and 0.04000==100 then
	return
	1
	end
	print@a16a@
	i=i
	+
	1
	until i==5
	local i=0
	while @a17a@ do
	if @a18a@ and@a19a@ then
	break
	elseif @a22a@ then
	print@a23a@
	return
	else
	print@a24a@
	i=-1
	+
	.1
	+
	i
	+
	1
	end
	end
	if this and that==those then
	thisandthat=this
	+
	that
	end
	while @a25a@ then
	end
	if
	{
		1,
		2,
		3,
	}
	==
	{
		1,
		2,
		3,
	}
	then
	print@a26a@
	return
	else
	print@a27a@
	return
	@s9s@
	end
	do
	print@a28a@
	return
	@a29a@
	end
	end
	function return_two_values@a30a@
	if @a31a@ then
	return
	1,
	2
	else
	return
	{
		1,
		2,
	}
	end
	end
	clone=function@a32a@
	print@a34a@
	end
	print@a36a@
	function tinsert@a37a@
	if @a38a@ then
	local TempTable=@tet@
	for i=Arg1, getn@a39a@ do
	TempTable
	@i3i@=tTable
	@i4i@
	end
	for i=Arg1, getn@a40a@ do
	tTable
	@i5i@=TempTable
	@i6i@
	end
	tTable
	@i7i@=Arg2
	else
	tTable
	@i8i@=Arg1
	end
	end


-----------------------------------------------------------
--		Indenting after "function", "then", "repeat" and "do"...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
			end,
			twelve=-12,
			@tet@,
		}
		temptable@i0i@=10
		temptable.eleven=@s3s@
		temptable@i1i@=12
		temptable@i2i@=4
		dothisfunction@a2a@
		argtable=
		{
			temptable,
			alpha,
			beta,
		}
		if 1==1 then	
			print@a3a@
			end
			dofiles=function@a4a@	
				print@a5a@
				end
				local functionsdostuff__=function@a6a@	
					do	
						end
						end
						dofiles@a7a@
						functionsdostuff__@a8a@
						function test_loop@a9a@	
							for i=@a10a@, @a11a@, @a12a@ do	
								print@a13a@
								end
								for i=1, 9 do	
									print@a14a@
									end
									for i, iCount in argtable do	
										print@a15a@
										end
										local i=0
										repeat	
											if i==100 and 0.04000==100 then	
												return
												1
												end
												print@a16a@
												i=i
												+
												1
												until i==5
												local i=0
												while @a17a@ do	
													if @a18a@ and@a19a@ then	
														break
														elseif @a22a@ then	
															print@a23a@
															return
															else
															print@a24a@
															i=-1
															+
															.1
															+
															i
															+
															1
															end
															end
															if this and that==those then	
																thisandthat=this
																+
																that
																end
																while @a25a@ then	
																	end
																	if
																	{
																		1,
																		2,
																		3,
																	}
																	==
																	{
																		1,
																		2,
																		3,
																	}
																	then	
																		print@a26a@
																		return
																		else
																		print@a27a@
																		return
																		@s9s@
																		end
																		do	
																			print@a28a@
																			return
																			@a29a@
																			end
																			end
																			function return_two_values@a30a@	
																				if @a31a@ then	
																					return
																					1,
																					2
																					else
																					return
																					{
																						1,
																						2,
																					}
																					end
																					end
																					clone=function@a32a@	
																						print@a34a@
																						end
																						print@a36a@
																						function tinsert@a37a@	
																							if @a38a@ then	
																								local TempTable=@tet@
																								for i=Arg1, getn@a39a@ do	
																									TempTable
																									@i3i@=tTable
																									@i4i@
																									end
																									for i=Arg1, getn@a40a@ do	
																										tTable
																										@i5i@=TempTable
																										@i6i@
																										end
																										tTable
																										@i7i@=Arg2
																										else
																										tTable
																										@i8i@=Arg1
																										end
																										end
																									

-----------------------------------------------------------
--		Outdenting after "end", "elseif" and "until"...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
			end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then	
		print@a3a@
		end
	dofiles=function@a4a@	
		print@a5a@
		end
	local functionsdostuff__=function@a6a@	
		do	
			end
		end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@	
		for i=@a10a@, @a11a@, @a12a@ do	
			print@a13a@
			end
		for i=1, 9 do	
			print@a14a@
			end
		for i, iCount in argtable do	
			print@a15a@
			end
		local i=0
		repeat	
			if i==100 and 0.04000==100 then	
				return
				1
				end
			print@a16a@
			i=i
			+
			1
			until i==5
		local i=0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
				elseif @a22a@ then	
				print@a23a@
				return
				else
				print@a24a@
				i=-1
				+
				.1
				+
				i
				+
				1
				end
			end
		if this and that==those then	
			thisandthat=this
			+
			that
			end
		while @a25a@ then	
			end
		if
		{
			1,
			2,
			3,
		}
		==
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
			else
			print@a27a@
			return
			@s9s@
			end
		do	
			print@a28a@
			return
			@a29a@
			end
		end
	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
			else
			return
			{
				1,
				2,
			}
			end
		end
	clone=function@a32a@	
		print@a34a@
		end
	print@a36a@
	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable=@tet@
			for i=Arg1, getn@a39a@ do	
				TempTable
				@i3i@=tTable
				@i4i@
				end
			for i=Arg1, getn@a40a@ do	
				tTable
				@i5i@=TempTable
				@i6i@
				end
			tTable
			@i7i@=Arg2
			else
			tTable
			@i8i@=Arg1
			end
		end


-----------------------------------------------------------
--		Putting a comma between table-entries that are tables, if missing...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
			end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then	
		print@a3a@
		end
	dofiles=function@a4a@	
		print@a5a@
		end
	local functionsdostuff__=function@a6a@	
		do	
			end
		end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@	
		for i=@a10a@, @a11a@, @a12a@ do	
			print@a13a@
			end
		for i=1, 9 do	
			print@a14a@
			end
		for i, iCount in argtable do	
			print@a15a@
			end
		local i=0
		repeat	
			if i==100 and 0.04000==100 then	
				return
				1
				end
			print@a16a@
			i=i
			+
			1
			until i==5
		local i=0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
				elseif @a22a@ then	
				print@a23a@
				return
				else
				print@a24a@
				i=-1
				+
				.1
				+
				i
				+
				1
				end
			end
		if this and that==those then	
			thisandthat=this
			+
			that
			end
		while @a25a@ then	
			end
		if
		{
			1,
			2,
			3,
		}
		==
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
			else
			print@a27a@
			return
			@s9s@
			end
		do	
			print@a28a@
			return
			@a29a@
			end
		end
	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
			else
			return
			{
				1,
				2,
			}
			end
		end
	clone=function@a32a@	
		print@a34a@
		end
	print@a36a@
	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable=@tet@
			for i=Arg1, getn@a39a@ do	
				TempTable
				@i3i@=tTable
				@i4i@
				end
			for i=Arg1, getn@a40a@ do	
				tTable
				@i5i@=TempTable
				@i6i@
				end
			tTable
			@i7i@=Arg2
			else
			tTable
			@i8i@=Arg1
			end
		end


-----------------------------------------------------------
--		Putting a comma after the last table-entry, if missing...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
			end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then	
		print@a3a@
		end
	dofiles=function@a4a@	
		print@a5a@
		end
	local functionsdostuff__=function@a6a@	
		do	
			end
		end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@	
		for i=@a10a@, @a11a@, @a12a@ do	
			print@a13a@
			end
		for i=1, 9 do	
			print@a14a@
			end
		for i, iCount in argtable do	
			print@a15a@
			end
		local i=0
		repeat	
			if i==100 and 0.04000==100 then	
				return
				1
				end
			print@a16a@
			i=i
			+
			1
			until i==5
		local i=0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
				elseif @a22a@ then	
				print@a23a@
				return
				else
				print@a24a@
				i=-1
				+
				.1
				+
				i
				+
				1
				end
			end
		if this and that==those then	
			thisandthat=this
			+
			that
			end
		while @a25a@ then	
			end
		if
		{
			1,
			2,
			3,
		}
		==
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
			else
			print@a27a@
			return
			@s9s@
			end
		do	
			print@a28a@
			return
			@a29a@
			end
		end
	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
			else
			return
			{
				1,
				2,
			}
			end
		end
	clone=function@a32a@	
		print@a34a@
		end
	print@a36a@
	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable=@tet@
			for i=Arg1, getn@a39a@ do	
				TempTable
				@i3i@=tTable
				@i4i@
				end
			for i=Arg1, getn@a40a@ do	
				tTable
				@i5i@=TempTable
				@i6i@
				end
			tTable
			@i7i@=Arg2
			else
			tTable
			@i8i@=Arg1
			end
		end


-----------------------------------------------------------
--		Outdenting all "else", "elseif", "until" and "end" statements...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;
	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@
	argtable=
	{
		temptable,
		alpha,
		beta,
	}
	if 1==1 then	
		print@a3a@
	end
	dofiles=function@a4a@	
		print@a5a@
	end
	local functionsdostuff__=function@a6a@	
		do	
		end
	end
	dofiles@a7a@
	functionsdostuff__@a8a@
	function test_loop@a9a@	
		for i=@a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i=1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i=0
		repeat	
			if i==100 and 0.04000==100 then	
				return
				1
			end
			print@a16a@
			i=i
			+
			1
		until i==5
		local i=0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i=-1
				+
				.1
				+
				i
				+
				1
			end
		end
		if this and that==those then	
			thisandthat=this
			+
			that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		}
		==
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end
	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end
	clone=function@a32a@	
		print@a34a@
	end
	print@a36a@
	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable=@tet@
			for i=Arg1, getn@a39a@ do	
				TempTable
				@i3i@=tTable
				@i4i@
			end
			for i=Arg1, getn@a40a@ do	
				tTable
				@i5i@=TempTable
				@i6i@
			end
			tTable
			@i7i@=Arg2
		else
			tTable
			@i8i@=Arg1
		end
	end


-----------------------------------------------------------
--		Placing blank lines before code blocks with global scope...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;

	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve=-12,
		@tet@,
	}
	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@

	argtable=
	{
		temptable,
		alpha,
		beta,
	}

	if 1==1 then	
		print@a3a@
	end
	dofiles=function@a4a@	
		print@a5a@
	end
	local functionsdostuff__=function@a6a@	
		do	
		end
	end
	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i=@a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i=1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i=0
		repeat	
			if i==100 and 0.04000==100 then	
				return
				1
			end
			print@a16a@
			i=i
			+
			1
		until i==5
		local i=0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i=-1
				+
				.1
				+
				i
				+
				1
			end
		end
		if this and that==those then	
			thisandthat=this
			+
			that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		}
		==
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end

	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end
	clone=function@a32a@	
		print@a34a@
	end
	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable=@tet@
			for i=Arg1, getn@a39a@ do	
				TempTable
				@i3i@=tTable
				@i4i@
			end
			for i=Arg1, getn@a40a@ do	
				tTable
				@i5i@=TempTable
				@i6i@
			end
			tTable
			@i7i@=Arg2
		else
			tTable
			@i8i@=Arg1
		end
	end


-----------------------------------------------------------
--		Placing blank lines after code blocks with global scope...
-----------------------------------------------------------


	local test_var1=endingine
	+
	10
	local test_var2=-100e+20
	local test_var3=5.0E-10
	local test_var4=e
	+
	5
	local test_var5=player01e
	+
	2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat=2
	functionvar=nil;
	endvar=nil;
	ifvar=nil;
	elseifvar=nil;
	whilevar=nil;
	untilvar=nil;
	andvar=nil;
	orvar=nil;
	notvar=nil;
	repeatvar=nil;
	returnvar=nil;
	breakvar=nil;
	localvar=nil;
	globalvar=nil;
	varfunction=nil;
	varend=nil;
	varif=nil;
	varelseif=nil;
	varwhile=nil;
	varuntil=nil;
	varand=nil;
	varor=nil;
	varnot=nil;
	varrepeat=nil;
	varreturn=nil;
	varbreak=nil;
	varlocal=nil;
	varglobal=nil;

	temptable=
	{
		1,
		2,
		3,
		4,
		-5,
		@s0s@,
		name_1=@s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve=-12,
		@tet@,
	}

	temptable@i0i@=10
	temptable.eleven=@s3s@
	temptable@i1i@=12
	temptable@i2i@=4
	dothisfunction@a2a@

	argtable=
	{
		temptable,
		alpha,
		beta,
	}


	if 1==1 then	
		print@a3a@
	end

	dofiles=function@a4a@	
		print@a5a@
	end

	local functionsdostuff__=function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i=@a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i=1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i=0
		repeat	
			if i==100 and 0.04000==100 then	
				return
				1
			end
			print@a16a@
			i=i
			+
			1
		until i==5
		local i=0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i=-1
				+
				.1
				+
				i
				+
				1
			end
		end
		if this and that==those then	
			thisandthat=this
			+
			that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		}
		==
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone=function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable=@tet@
			for i=Arg1, getn@a39a@ do	
				TempTable
				@i3i@=tTable
				@i4i@
			end
			for i=Arg1, getn@a40a@ do	
				tTable
				@i5i@=TempTable
				@i6i@
			end
			tTable
			@i7i@=Arg2
		else
			tTable
			@i8i@=Arg1
		end
	end



-----------------------------------------------------------
--		Surrounding most operators with single spaces...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = {
		1,
		2,
		3,
		4, - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable@i0i@ = 10
	temptable.eleven = @s3s@
	temptable@i1i@ = 12
	temptable@i2i@ = 4
	dothisfunction@a2a@

	argtable = {
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		} == {
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				@i3i@ = tTable
				@i4i@
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				@i5i@ = TempTable
				@i6i@
			end
			tTable
			@i7i@ = Arg2
		else
			tTable
			@i8i@ = Arg1
		end
	end



-----------------------------------------------------------
--		Adding a space before equal signs at the end of a line...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = {
		1,
		2,
		3,
		4, - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable@i0i@ = 10
	temptable.eleven = @s3s@
	temptable@i1i@ = 12
	temptable@i2i@ = 4
	dothisfunction@a2a@

	argtable = {
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		} == {
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				@i3i@ = tTable
				@i4i@
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				@i5i@ = TempTable
				@i6i@
			end
			tTable
			@i7i@ = Arg2
		else
			tTable
			@i8i@ = Arg1
		end
	end



-----------------------------------------------------------
--		Breaking unary operators onto new lines.
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = {
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable@i0i@ = 10
	temptable.eleven = @s3s@
	temptable@i1i@ = 12
	temptable@i2i@ = 4
	dothisfunction@a2a@

	argtable = {
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		} == {
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				@i3i@ = tTable
				@i4i@
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				@i5i@ = TempTable
				@i6i@
			end
			tTable
			@i7i@ = Arg2
		else
			tTable
			@i8i@ = Arg1
		end
	end



-----------------------------------------------------------
--		Remove spaces from around the exponation operator...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = {
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable@i0i@ = 10
	temptable.eleven = @s3s@
	temptable@i1i@ = 12
	temptable@i2i@ = 4
	dothisfunction@a2a@

	argtable = {
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		} == {
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				@i3i@ = tTable
				@i4i@
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				@i5i@ = TempTable
				@i6i@
			end
			tTable
			@i7i@ = Arg2
		else
			tTable
			@i8i@ = Arg1
		end
	end



-----------------------------------------------------------
--		Breaking before left table brackets, if not already...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable@i0i@ = 10
	temptable.eleven = @s3s@
	temptable@i1i@ = 12
	temptable@i2i@ = 4
	dothisfunction@a2a@

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		} == 
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				@i3i@ = tTable
				@i4i@
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				@i5i@ = TempTable
				@i6i@
			end
			tTable
			@i7i@ = Arg2
		else
			tTable
			@i8i@ = Arg1
		end
	end



-----------------------------------------------------------
--		Breaking after right table brackets, if not already...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable@i0i@ = 10
	temptable.eleven = @s3s@
	temptable@i1i@ = 12
	temptable@i2i@ = 4
	dothisfunction@a2a@

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				@i3i@ = tTable
				@i4i@
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				@i5i@ = TempTable
				@i6i@
			end
			tTable
			@i7i@ = Arg2
		else
			tTable
			@i8i@ = Arg1
		end
	end



-----------------------------------------------------------
--		Replacing gibberish with original table indices...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function@a0a@	
			print@a1a@
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable[10] = 10
	temptable.eleven = @s3s@
	temptable[@s4s@] = 12
	temptable[4] = 4
	dothisfunction@a2a@

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print@a3a@
	end

	dofiles = function@a4a@	
		print@a5a@
	end

	local functionsdostuff__ = function@a6a@	
		do	
		end
	end

	dofiles@a7a@
	functionsdostuff__@a8a@

	function test_loop@a9a@	
		for i = @a10a@, @a11a@, @a12a@ do	
			print@a13a@
		end
		for i = 1, 9 do	
			print@a14a@
		end
		for i, iCount in argtable do	
			print@a15a@
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print@a16a@
			i = i + 1
		until i == 5
		local i = 0
		while @a17a@ do	
			if @a18a@ and@a19a@ then	
				break
			elseif @a22a@ then	
				print@a23a@
				return
			else
				print@a24a@
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while @a25a@ then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print@a26a@
			return
		else
			print@a27a@
			return
			@s9s@
		end
		do	
			print@a28a@
			return
			@a29a@
		end
	end


	function return_two_values@a30a@	
		if @a31a@ then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function@a32a@	
		print@a34a@
	end

	print@a36a@

	function tinsert@a37a@	
		if @a38a@ then	
			local TempTable = @tet@
			for i = Arg1, getn@a39a@ do	
				TempTable
				[i + 1] = tTable
				[i]
			end
			for i = Arg1, getn@a40a@ do	
				tTable
				[i + 1] = TempTable
				[i + 1]
			end
			tTable
			[Arg1] = Arg2
		else
			tTable
			[getn @a41a@ + 1] = Arg1
		end
	end



-----------------------------------------------------------
--		Replacing gibberish with original function arguments...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function()	
			print(@s2s@)
		end,
		twelve =  - 12,
		@tet@,
	}

	temptable[10] = 10
	temptable.eleven = @s3s@
	temptable[@s4s@] = 12
	temptable[4] = 4
	dothisfunction({1, 1, 1, })

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print(@s5s@)
	end

	dofiles = function()	
		print(@s6s@)
	end

	local functionsdostuff__ = function()	
		do	
		end
	end

	dofiles()
	functionsdostuff__()

	function test_loop()	
		for i = (1), (9), (2) do	
			print(i^- 2)
		end
		for i = 1, 9 do	
			print(i)
		end
		for i, iCount in argtable do	
			print(i)
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print(i)
			i = i + 1
		until i == 5
		local i = 0
		while (i < 7) do	
			if (i == 0.0000) and(- 400.0 == 200.050) then	
				break
			elseif ((2 == 2) and (4 == 5)) then	
				print(i)
				return
			else
				print(i)
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while (them not they ~= we) then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print(@s7s@)
			return
		else
			print(@s8s@)
			return
			@s9s@
		end
		do	
			print(i .. @s10s@)
			return
			(2)
		end
	end


	function return_two_values(arg)	
		if (arg == 1) then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function(self)	
		print(type(self))
	end

	print(test_loop())

	function tinsert(tTable, Arg1, Arg2)	
		if (Arg2) then	
			local TempTable = @tet@
			for i = Arg1, getn(tTable) do	
				TempTable
				[i + 1] = tTable
				[i]
			end
			for i = Arg1, getn(tTable) do	
				tTable
				[i + 1] = TempTable
				[i + 1]
			end
			tTable
			[Arg1] = Arg2
		else
			tTable
			[getn (tTable) + 1] = Arg1
		end
	end



-----------------------------------------------------------
--		Replacing gibberish with original empty tables...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		@s0s@,
		name_1 = @s1s@,
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function()	
			print(@s2s@)
		end,
		twelve =  - 12,
		{},
	}

	temptable[10] = 10
	temptable.eleven = @s3s@
	temptable[@s4s@] = 12
	temptable[4] = 4
	dothisfunction({1, 1, 1, })

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print(@s5s@)
	end

	dofiles = function()	
		print(@s6s@)
	end

	local functionsdostuff__ = function()	
		do	
		end
	end

	dofiles()
	functionsdostuff__()

	function test_loop()	
		for i = (1), (9), (2) do	
			print(i^- 2)
		end
		for i = 1, 9 do	
			print(i)
		end
		for i, iCount in argtable do	
			print(i)
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print(i)
			i = i + 1
		until i == 5
		local i = 0
		while (i < 7) do	
			if (i == 0.0000) and(- 400.0 == 200.050) then	
				break
			elseif ((2 == 2) and (4 == 5)) then	
				print(i)
				return
			else
				print(i)
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while (them not they ~= we) then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print(@s7s@)
			return
		else
			print(@s8s@)
			return
			@s9s@
		end
		do	
			print(i .. @s10s@)
			return
			(2)
		end
	end


	function return_two_values(arg)	
		if (arg == 1) then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function(self)	
		print(type(self))
	end

	print(test_loop())

	function tinsert(tTable, Arg1, Arg2)	
		if (Arg2) then	
			local TempTable = {}
			for i = Arg1, getn(tTable) do	
				TempTable
				[i + 1] = tTable
				[i]
			end
			for i = Arg1, getn(tTable) do	
				tTable
				[i + 1] = TempTable
				[i + 1]
			end
			tTable
			[Arg1] = Arg2
		else
			tTable
			[getn (tTable) + 1] = Arg1
		end
	end



-----------------------------------------------------------
--		Replacing gibberish with original strings...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		"six",
		name_1 = "string_1",
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function()	
			print("Nine")
		end,
		twelve =  - 12,
		{},
	}

	temptable[10] = 10
	temptable.eleven = "eleven"
	temptable["twelve"] = 12
	temptable[4] = 4
	dothisfunction({1, 1, 1, })

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print("1 = 1")
	end

	dofiles = function()	
		print("printing")
	end

	local functionsdostuff__ = function()	
		do	
		end
	end

	dofiles()
	functionsdostuff__()

	function test_loop()	
		for i = (1), (9), (2) do	
			print(i^- 2)
		end
		for i = 1, 9 do	
			print(i)
		end
		for i, iCount in argtable do	
			print(i)
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print(i)
			i = i + 1
		until i == 5
		local i = 0
		while (i < 7) do	
			if (i == 0.0000) and(- 400.0 == 200.050) then	
				break
			elseif ((2 == 2) and (4 == 5)) then	
				print(i)
				return
			else
				print(i)
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while (them not they ~= we) then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print("equalorequalorequalorequal")
			return
		else
			print("not equal")
			return
			"bladibla"
		end
		do	
			print(i .. " eyes")
			return
			(2)
		end
	end


	function return_two_values(arg)	
		if (arg == 1) then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function(self)	
		print(type(self))
	end

	print(test_loop())

	function tinsert(tTable, Arg1, Arg2)	
		if (Arg2) then	
			local TempTable = {}
			for i = Arg1, getn(tTable) do	
				TempTable
				[i + 1] = tTable
				[i]
			end
			for i = Arg1, getn(tTable) do	
				tTable
				[i + 1] = TempTable
				[i + 1]
			end
			tTable
			[Arg1] = Arg2
		else
			tTable
			[getn (tTable) + 1] = Arg1
		end
	end



-----------------------------------------------------------
--		Replacing gibberish with original escaped quotation marks...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		"six",
		name_1 = "string_1",
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function()	
			print("Nine")
		end,
		twelve =  - 12,
		{},
	}

	temptable[10] = 10
	temptable.eleven = "eleven"
	temptable["twelve"] = 12
	temptable[4] = 4
	dothisfunction({1, 1, 1, })

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print("1 = 1")
	end

	dofiles = function()	
		print("printing")
	end

	local functionsdostuff__ = function()	
		do	
		end
	end

	dofiles()
	functionsdostuff__()

	function test_loop()	
		for i = (1), (9), (2) do	
			print(i^- 2)
		end
		for i = 1, 9 do	
			print(i)
		end
		for i, iCount in argtable do	
			print(i)
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print(i)
			i = i + 1
		until i == 5
		local i = 0
		while (i < 7) do	
			if (i == 0.0000) and(- 400.0 == 200.050) then	
				break
			elseif ((2 == 2) and (4 == 5)) then	
				print(i)
				return
			else
				print(i)
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while (them not they ~= we) then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print("equalorequalorequalorequal")
			return
		else
			print("not equal")
			return
			"bladibla"
		end
		do	
			print(i .. " eyes")
			return
			(2)
		end
	end


	function return_two_values(arg)	
		if (arg == 1) then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function(self)	
		print(type(self))
	end

	print(test_loop())

	function tinsert(tTable, Arg1, Arg2)	
		if (Arg2) then	
			local TempTable = {}
			for i = Arg1, getn(tTable) do	
				TempTable
				[i + 1] = tTable
				[i]
			end
			for i = Arg1, getn(tTable) do	
				tTable
				[i + 1] = TempTable
				[i + 1]
			end
			tTable
			[Arg1] = Arg2
		else
			tTable
			[getn (tTable) + 1] = Arg1
		end
	end



-----------------------------------------------------------
--		Replacing gibberish with original comments...
-----------------------------------------------------------


	local test_var1 = endingine + 10
	local test_var2 =  - 100e + 20
	local test_var3 = 5.0E - 10
	local test_var4 = e + 5
	local test_var5 = player01e + 2
	thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
	functionvar = nil;
	endvar = nil;
	ifvar = nil;
	elseifvar = nil;
	whilevar = nil;
	untilvar = nil;
	andvar = nil;
	orvar = nil;
	notvar = nil;
	repeatvar = nil;
	returnvar = nil;
	breakvar = nil;
	localvar = nil;
	globalvar = nil;
	varfunction = nil;
	varend = nil;
	varif = nil;
	varelseif = nil;
	varwhile = nil;
	varuntil = nil;
	varand = nil;
	varor = nil;
	varnot = nil;
	varrepeat = nil;
	varreturn = nil;
	varbreak = nil;
	varlocal = nil;
	varglobal = nil;

	temptable = 
	{
		1,
		2,
		3,
		4,
		 - 5,
		"six",
		name_1 = "string_1",
		{
			7.1,
			7.2,
			7.3,
		},
		getlength,
		function()	
			print("Nine")
		end,
		twelve =  - 12,
		{},
	}

	temptable[10] = 10
	temptable.eleven = "eleven"
	temptable["twelve"] = 12
	temptable[4] = 4
	dothisfunction({1, 1, 1, })

	argtable = 
	{
		temptable,
		alpha,
		beta,
	}


	if 1 == 1 then	
		print("1 = 1")
	end

	dofiles = function()	
		print("printing")
	end

	local functionsdostuff__ = function()	
		do	
		end
	end

	dofiles()
	functionsdostuff__()

	function test_loop()	
		for i = (1), (9), (2) do	
			print(i^- 2)
		end
		for i = 1, 9 do	
			print(i)
		end
		for i, iCount in argtable do	
			print(i)
		end
		local i = 0
		repeat	
			if i == 100 and 0.04000 == 100 then	
				return
				1
			end
			print(i)
			i = i + 1
		until i == 5
		local i = 0
		while (i < 7) do	
			if (i == 0.0000) and(- 400.0 == 200.050) then	
				break
			elseif ((2 == 2) and (4 == 5)) then	
				print(i)
				return
			else
				print(i)
				i =  - 1 + .1 + i + 1
			end
		end
		if this and that == those then	
			thisandthat = this + that
		end
		while (them not they ~= we) then	
		end
		if
		{
			1,
			2,
			3,
		}
		== 
		{
			1,
			2,
			3,
		}
		then	
			print("equalorequalorequalorequal")
			return
		else
			print("not equal")
			return
			"bladibla"
		end
		do	
			print(i .. " eyes")
			return
			(2)
		end
	end


	function return_two_values(arg)	
		if (arg == 1) then	
			return
			1,
			2
		else
			return
			{
				1,
				2,
			}
		end
	end

	clone = function(self)	
		print(type(self))
	end

	print(test_loop())

	function tinsert(tTable, Arg1, Arg2)	
		if (Arg2) then	
			local TempTable = {}
			for i = Arg1, getn(tTable) do	
				TempTable
				[i + 1] = tTable
				[i]
			end
			for i = Arg1, getn(tTable) do	
				tTable
				[i + 1] = TempTable
				[i + 1]
			end
			tTable
			[Arg1] = Arg2
		else
			tTable
			[getn (tTable) + 1] = Arg1
		end
	end



-----------------------------------------------------------
--		Outdenting every line...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e + 20
local test_var3 = 5.0E - 10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil;
endvar = nil;
ifvar = nil;
elseifvar = nil;
whilevar = nil;
untilvar = nil;
andvar = nil;
orvar = nil;
notvar = nil;
repeatvar = nil;
returnvar = nil;
breakvar = nil;
localvar = nil;
globalvar = nil;
varfunction = nil;
varend = nil;
varif = nil;
varelseif = nil;
varwhile = nil;
varuntil = nil;
varand = nil;
varor = nil;
varnot = nil;
varrepeat = nil;
varreturn = nil;
varbreak = nil;
varlocal = nil;
varglobal = nil;

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}


if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04000 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0.0000) and(- 400.0 == 200.050) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + .1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end


function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Removing zero-value decimals...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e + 20
local test_var3 = 5.0E - 10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil;
endvar = nil;
ifvar = nil;
elseifvar = nil;
whilevar = nil;
untilvar = nil;
andvar = nil;
orvar = nil;
notvar = nil;
repeatvar = nil;
returnvar = nil;
breakvar = nil;
localvar = nil;
globalvar = nil;
varfunction = nil;
varend = nil;
varif = nil;
varelseif = nil;
varwhile = nil;
varuntil = nil;
varand = nil;
varor = nil;
varnot = nil;
varrepeat = nil;
varreturn = nil;
varbreak = nil;
varlocal = nil;
varglobal = nil;

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}


if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04000 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.050) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + .1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end


function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Removing trailing zero-value decimals...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e + 20
local test_var3 = 5.0E - 10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil;
endvar = nil;
ifvar = nil;
elseifvar = nil;
whilevar = nil;
untilvar = nil;
andvar = nil;
orvar = nil;
notvar = nil;
repeatvar = nil;
returnvar = nil;
breakvar = nil;
localvar = nil;
globalvar = nil;
varfunction = nil;
varend = nil;
varif = nil;
varelseif = nil;
varwhile = nil;
varuntil = nil;
varand = nil;
varor = nil;
varnot = nil;
varrepeat = nil;
varreturn = nil;
varbreak = nil;
varlocal = nil;
varglobal = nil;

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}


if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + .1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end


function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Adding missing zeros before decimals...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e + 20
local test_var3 = 5.0E - 10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil;
endvar = nil;
ifvar = nil;
elseifvar = nil;
whilevar = nil;
untilvar = nil;
andvar = nil;
orvar = nil;
notvar = nil;
repeatvar = nil;
returnvar = nil;
breakvar = nil;
localvar = nil;
globalvar = nil;
varfunction = nil;
varend = nil;
varif = nil;
varelseif = nil;
varwhile = nil;
varuntil = nil;
varand = nil;
varor = nil;
varnot = nil;
varrepeat = nil;
varreturn = nil;
varbreak = nil;
varlocal = nil;
varglobal = nil;

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}


if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end


function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Removing semi-colons at the end of lines...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e + 20
local test_var3 = 5.0E - 10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil
endvar = nil
ifvar = nil
elseifvar = nil
whilevar = nil
untilvar = nil
andvar = nil
orvar = nil
notvar = nil
repeatvar = nil
returnvar = nil
breakvar = nil
localvar = nil
globalvar = nil
varfunction = nil
varend = nil
varif = nil
varelseif = nil
varwhile = nil
varuntil = nil
varand = nil
varor = nil
varnot = nil
varrepeat = nil
varreturn = nil
varbreak = nil
varlocal = nil
varglobal = nil

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}


if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end


function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Fixing natural logarithms...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil
endvar = nil
ifvar = nil
elseifvar = nil
whilevar = nil
untilvar = nil
andvar = nil
orvar = nil
notvar = nil
repeatvar = nil
returnvar = nil
breakvar = nil
localvar = nil
globalvar = nil
varfunction = nil
varend = nil
varif = nil
varelseif = nil
varwhile = nil
varuntil = nil
varand = nil
varor = nil
varnot = nil
varrepeat = nil
varreturn = nil
varbreak = nil
varlocal = nil
varglobal = nil

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}


if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end


function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Removing double-blank lines...
-----------------------------------------------------------


local test_var1 = endingine + 10
local test_var2 =  - 100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil
endvar = nil
ifvar = nil
elseifvar = nil
whilevar = nil
untilvar = nil
andvar = nil
orvar = nil
notvar = nil
repeatvar = nil
returnvar = nil
breakvar = nil
localvar = nil
globalvar = nil
varfunction = nil
varend = nil
varif = nil
varelseif = nil
varwhile = nil
varuntil = nil
varand = nil
varor = nil
varnot = nil
varrepeat = nil
varreturn = nil
varbreak = nil
varlocal = nil
varglobal = nil

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end

function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end



-----------------------------------------------------------
--		Removing blank lines at the beginning of the file...
-----------------------------------------------------------

local test_var1 = endingine + 10
local test_var2 =  - 100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil
endvar = nil
ifvar = nil
elseifvar = nil
whilevar = nil
untilvar = nil
andvar = nil
orvar = nil
notvar = nil
repeatvar = nil
returnvar = nil
breakvar = nil
localvar = nil
globalvar = nil
varfunction = nil
varend = nil
varif = nil
varelseif = nil
varwhile = nil
varuntil = nil
varand = nil
varor = nil
varnot = nil
varrepeat = nil
varreturn = nil
varbreak = nil
varlocal = nil
varglobal = nil

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end

function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end


-----------------------------------------------------------
--		Adding a blank line to the end of the file if not already...
-----------------------------------------------------------

local test_var1 = endingine + 10
local test_var2 =  - 100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil
endvar = nil
ifvar = nil
elseifvar = nil
whilevar = nil
untilvar = nil
andvar = nil
orvar = nil
notvar = nil
repeatvar = nil
returnvar = nil
breakvar = nil
localvar = nil
globalvar = nil
varfunction = nil
varend = nil
varif = nil
varelseif = nil
varwhile = nil
varuntil = nil
varand = nil
varor = nil
varnot = nil
varrepeat = nil
varreturn = nil
varbreak = nil
varlocal = nil
varglobal = nil

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end

function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end


-----------------------------------------------------------
--		Replacing all carriage returns...
-----------------------------------------------------------

local test_var1 = endingine + 10
local test_var2 =  - 100e+20
local test_var3 = 5.0E-10
local test_var4 = e + 5
local test_var5 = player01e + 2
thisvariablehasthefollowingwordsinit_functionendorandnotforifwhilereturndountilrepeat = 2
functionvar = nil
endvar = nil
ifvar = nil
elseifvar = nil
whilevar = nil
untilvar = nil
andvar = nil
orvar = nil
notvar = nil
repeatvar = nil
returnvar = nil
breakvar = nil
localvar = nil
globalvar = nil
varfunction = nil
varend = nil
varif = nil
varelseif = nil
varwhile = nil
varuntil = nil
varand = nil
varor = nil
varnot = nil
varrepeat = nil
varreturn = nil
varbreak = nil
varlocal = nil
varglobal = nil

temptable = 
{
	1,
	2,
	3,
	4,
	 - 5,
	"six",
	name_1 = "string_1",
	{
		7.1,
		7.2,
		7.3,
	},
	getlength,
	function()	
		print("Nine")
	end,
	twelve =  - 12,
	{},
}

temptable[10] = 10
temptable.eleven = "eleven"
temptable["twelve"] = 12
temptable[4] = 4
dothisfunction({1, 1, 1, })

argtable = 
{
	temptable,
	alpha,
	beta,
}

if 1 == 1 then	
	print("1 = 1")
end

dofiles = function()	
	print("printing")
end

local functionsdostuff__ = function()	
	do	
	end
end

dofiles()
functionsdostuff__()

function test_loop()	
	for i = (1), (9), (2) do	
		print(i^- 2)
	end
	for i = 1, 9 do	
		print(i)
	end
	for i, iCount in argtable do	
		print(i)
	end
	local i = 0
	repeat	
		if i == 100 and 0.04 == 100 then	
			return
			1
		end
		print(i)
		i = i + 1
	until i == 5
	local i = 0
	while (i < 7) do	
		if (i == 0) and(- 400 == 200.05) then	
			break
		elseif ((2 == 2) and (4 == 5)) then	
			print(i)
			return
		else
			print(i)
			i =  - 1 + 0.1 + i + 1
		end
	end
	if this and that == those then	
		thisandthat = this + that
	end
	while (them not they ~= we) then	
	end
	if
	{
		1,
		2,
		3,
	}
	== 
	{
		1,
		2,
		3,
	}
	then	
		print("equalorequalorequalorequal")
		return
	else
		print("not equal")
		return
		"bladibla"
	end
	do	
		print(i .. " eyes")
		return
		(2)
	end
end

function return_two_values(arg)	
	if (arg == 1) then	
		return
		1,
		2
	else
		return
		{
			1,
			2,
		}
	end
end

clone = function(self)	
	print(type(self))
end

print(test_loop())

function tinsert(tTable, Arg1, Arg2)	
	if (Arg2) then	
		local TempTable = {}
		for i = Arg1, getn(tTable) do	
			TempTable
			[i + 1] = tTable
			[i]
		end
		for i = Arg1, getn(tTable) do	
			tTable
			[i + 1] = TempTable
			[i + 1]
		end
		tTable
		[Arg1] = Arg2
	else
		tTable
		[getn (tTable) + 1] = Arg1
	end
end


