Improved RNG script

#NoEnv
#HotkeyInterval -1
#MaxHotkeysPerInterval 99999999999999999
#MaxThreadsPerHotkey 999999999999
#MaxThreadsBuffer on
#Persistent
#SingleInstance Force
Thread, priority, 0
Thread, interrupt, 0
SetKeyDelay -1,-1,-1
SetBatchLines -1
SetWinDelay -1
SetControlDelay -1
SetMouseDelay -1
SendMode Input
Process Priority,,High

leftrightbias:= 0
updownbias := 0
startBias := 0
ABias := 0
BBias := 0

	biasAmount := 1


f8::Pause

1::
	biasAmount := 1
	return

2::
	biasAmount := 2
	return

3::
	biasAmount := 3
	return

4::
	biasAmount := 4
	return

5::
	biasAmount := 5
	return

6::
	biasAmount := 6
	return

7::
	biasAmount := 7
	return

8::
	biasAmount := 8
	return

9::
	biasAmount := 9
	return



r::
	ABias		:= biasAmount
	return

e::
	BBias		:= biasAmount
	return


s::
	updownbias 	:= -biasAmount
	return

w::
	updownbias	:= biasAmount
	return

a::
	leftrightbias	:= -biasAmount
	return

d::
	leftirghtbias	:= biasAmount
	return


c::
	leftrightbias 	:= 0
	updownbias   	:= 0
	ABias 		:= 0
	BBias		:= 0
	startBias	:= 0
	return






*~$f9::
{
   toggle:=!toggle

   while, toggle
    {
 Loop,1

sleep,100
send {Numpad1 up}
send {Numpad2 up}
send {Numpad3 up}
send {Numpad4 up}
send {Numpad5 up}
send {Numpad6 up}
send {Numpad7 up}
send {Numpad8 up}
send {Numpad9 up}

Random, var, 1,100

if (var >= 1 && var <= (15 + updownbias) )
send {Numpad8 down}

else if (var >= (16 + updownbias) && var <= 30)
send {Numpad2 down}

else if (var >= 31 && var <= (55 + ABias))
send {Numpad3 down}

else if (var >= (56 + ABias) && var <= (65 + ABias + BBias))
send {Numpad1 down}

else if (var >= (66 + ABias + BBias) && var <= (70 + ABias + BBias))
send {Numpad7 down}

else if (var >= (71 + + ABias + BBias) && var <= (85 + leftrightbias + ABias + BBias) )
send {Numpad6 down}

else if (var >= (86 + leftrightbias+ ABias + BBias) && var <= (100 + ABias + BBias) )
send {Numpad4 down}

    }
 }